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eeeee MODIFICATION HISTORY seees 


Original release: 31-OCT-83 (EDITED 11-JUL-83) 
Bert Kleinschmidt 


Version 60 09-OCT-83 Bert Kleinschmidt 
Fixed typographical errors. 
Moved test from CVDHB (Pert 2) into this program: 
Old CVDHB (version A) tests 2 through 8 are 
now New CVDHA (version B) tests 20 through 26. 
Modified test 13 (Selftest Fail Test) to allow use of CVDHA 
in manufacturing with version 0 DHV ROM code. 


Version CO 17-JUL-84 Bert Kleinschmidt 
Modified control of processor priority throughout the 
program to maintain priorities of 5 or lower to allow 
LTC interrupts. This guarantees a less than 2 second 
responce to a Break request while running under APT. 


Version CO 9-SEP-84 PETER ONEIL 
Modified cleanup code to turn off clock if it was turned on. 


29-MAR -85 Howard Marshall 
Did formal release of version CVDHACO. 


Version DO 8-May -85 Howard Marshall 
Found timing problems when running under the extended 
DRS monitor on a POP 11/23+ in tests: #10, Skip selftest 
test and #13, Selftest fail test because extra under slower 
CPUs. DRS calls consume too much time and interfere with 
the critical timing loops in these tests. Substituted 
SETPRI + GETPRI with MTPS + MFPS respectively. 


ATTENTION: /NO RESTORE (of _— IS ASSEMBLED INTO THIS DIAG. !!! 


Vv 
SSCSSEEEEKSSESESSKEKEEEKEEEEEEHEEESESEASESAEESEEEEEEEEARERELELALESE 
* Found additional timing problems when runnirg under the & 


* extended DRS monitor on a PDP 11/23+ in test $3, Master reset + 
* skip selftest test. The DRS calls are consuming too much time ¢ 
* and adversly affecti the timing of the critical loops in tests 
# @3. Assembled in “/NORESTORE” into this source code by adding « 
* an argument (a 1) to the end of the HEADER macro. & 
SECEEESESEEEEEEEEKSESEEKESESAESASESKESEAESSEAEEEEKESELEEALEEEALELE 
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1.0 GENERAL PROGRAM CONSIDERATIONS 

1.1 PROGRAM ABSTRACT 

CVDHA is part one of the DHV11-M functional verification test. This 
pert of the test verifies that the reset, register access, and 

interrupt functions of the board are functioning correctly. 

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC RUNTIME 

SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE THE INTERFACE 

TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. THIS PROGRAM CAN BE 

USED WITH XXDP+, ACT, APT, SLIDE AND PAPER TAPE. FOR A COMPLETE 

DESCRIPTION OF THE RUNTIME SERVICES, REFER TO THE XXDP+ USER'S MANUAL. 


THERE IS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES IN THE OPERATING 
INSTRUCTIONS-COMMANDS OF THIS DOCUMENT. 


1.2 SYSTEM REQUIREMENTS 
The following hardware is required to run the DHV FVT: 


© LSI-11 processor with at least 32 Kbytes of RAM. 
© DHV11 boards installed on the Q-bus. 


© Appropriate program load device supporting XXDP+ 
media or a down-line loading system. 


1.3 RELATED DOCUMENTS AND STANDARDS 
© DHV11-M Hardware Manual - This manual describes the 
functions and uses of the DHV11-M device. 


o XXDP+ User's Manual - Describes the running of 
diagnostics under the XXDP+ monitor. 





SEQ 0004 
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1.4 DIAGNOSTIC HIERARCY PREREQUISITES 
The LSI-11 processor, the Q-BUS, the system memory, the 


console terminal, and the load media are assumed to have 
been tested and found working before this program is run. 


-— 








SEQ 0005 
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2.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME 


SERVICES. FOR DETAILED INFORMATION, REFER TO THE XXDP+ 
USER'S MANUAL (CHQUS). 


SEQ 0006 


2.1 COMMANDS 


THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
CSUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START . START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONTINUE CONTINUE AT TEST THAT WAS INTERRUPTED CAFTER tC) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING CALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 

DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION CIF IMPLEMENTED 


BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 
REPORTS SECTION OF THIS DOCUMENT) 


DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 
FLAGS TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 
ZFLAGS CLEAR ALL FLAGS (SEE FLAGS SECTION) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. SO 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “START”. 

MORE INFORMATION CAN BE FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD". 


SWITCH EFFECT 

/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10. 


-— 
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THIS LIST WILL CAUSE TESTS 1,5,7,8,9,10 TO 

BE RUN. ALL UTHER TESTS WILL NOT BE RUN. 
/PASS :DDDDD EXECUTE DODDD PASSES (DDDDD = 1 TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS.SEE THE FLAGS SECTION 

OF THIS DOCUMENT. 
7EOP : DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 

DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 

IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 

USE UNITS 0,5,10,11,12 CUNIT NUMBERS = 0-63) 


EXAMPLE OF SWITCH USAGE: 

START/TESTS:1-5/PASS: 1000/E0P : 100 
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-5” INSTEAD OF “/TESTS:1-5". 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 


COMMAND . 

TESTS PASS FLAGS EOP UNITS 
START x X Xx X x 
RESTART xX x x X X 
CONTINUE x x x 
PROCEED X 
DROP x 
ADD Xx 
PRINT 
DISPLAY X 
FLAGS 
ZFLAGS 
EXIT 


a 
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FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IERs INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 


FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 


IXR* INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE “BELL” ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 


APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 


IOR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT. 
SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 
AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS:LOE: IER: BOE 


SEQ 0008 
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2.4.1 START COMMAND - 

$O060666000 06064600 66646646646 460000446464 460644444060444460464 4404 0% 

STACRT)/TESTS:<TEST-LIST>/PASS: <PASS-CNT>/FLAGS: 
<FLAG-LIST>/EOP: <INCR> 

SHECAERASSKEREREREREASESEEAEAESESEEEREASEEEAEE ERE LELELELELEA RE 





SEQ 0009 


2.4.1.1 Tests Switch (/TESTS:<TEST-LIST>) - 


<TEST-LIST> Is a sequence of decimal numbers (1:2 etc. ) 
or ranges of decimal numbers (1-5:8-10 etc.), seperated by 
colons, that specify the tests to be executed.Tests will be 
executed in numerical order regardless of the order of 
specification. The default is to execute all tests. On 
this and all switches, the angle brackets <> are punctuation 
used in the definition only, and are not to be typed by the 
operator. See example at end of "Effect of Start Command” 
section. 


2.4.1.2 Pass Switch (/PASS:<PASS-CNT>) - 


<PASS-CNT> Is a decimal number indicating the desired 
number of passes. A pass is defined as the execution of the 
full diagnostic (all selected tests).The default’ is 
non-ending execution. In this case, exit from the program 
is accomplished either by typing a control/C or by occurance 
of an error with the halt on error flag being set. The exit 
is a return to command mode. See example at end of “Effect 
of Start Command” section. 


2.4.1.3 Flags Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> is a sequence of elements of the form 
<FLAG>, <FLAG=1>, or <FLAG=0>, separated by colons, where 
<FLAG> has one of the following values: 


HOE Halt on error, causing command mode to 
be entered when an error is encountered. 

LOE Loop on error, causing the diagnostic to 
loop continuously within the smallest 
defined block of coding (segment, subtest, 
or test) containing the error. 

IER Inhibit error reporting. 

IBE Inhibit basic error reports. 

IXE Inhibit extended error reports. 

PRI Direct ell messages to a line printer. 

PNT Print number of test being executed. 

BOE Bell on error. 

VAM Run in unattended mode, bypassing manual 


ee 
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intervention. 

ISR Inhibit statistical reports. 

IDU Inhibit dropping of units by diagnostic. 

LOT Loop on test. 
The flags named or equated to 1 are set, those equated to 0 
are cleared. A flag not specified is cleared. If the flags 
switch is not given all flags are cleared. See example at 
end of “Effect of Start Command” section. 


2.4.1.4 End Of Pass Switch (/EOP:<INCR>) - 


<INCR> Is a decimal number indicating how often (Cin 
terms of passes) it is desired that the end of pass message 
be printed. The default is at the end of every pass. See 
exarple at end of "Effect of Start Command” section. 


2.4.1.5 Effect Of Start Command - 


The effect of the start command is to initiate the 
hardware parameter dialogue, the software parameter 
dialogue, the initialization questions, and then the 
diagnostic commences testing. 


The hardware parameter dialogue commences with the 
question "# UNITS (D) ?” to which the operator should reply 
with the number of units to be tested. Following this are 
the questions whereby the P-Tebles themselves are built. 
Each P-Table is a core-resident table containing all the 
hardware information for one complete unit.Each question is 
followed by the response radix (D for decimal, 8 for binary, 
0 for octal, L for Yes/No) in parentheses and the default 
value after the parentheses. For the actual Hardware 
P-Table questions see the “Hardware Parameters” section. 


Following the hardware questions are the software 
questions to build the softwere tables, which define 
operating parameters of the diagnostic program. These 
Questions are described in the “Software Parameters” 
section. 


EXAMPLE : 
STA/TESTS:1:3-4:/PASS:3/FLAGS: IER: HOE=1 


This command will cause three passes to be made, with 
each pass consisting of tests 1,3, and 4. There is no 
difference between saying <FLAG> and saying <FLAG=1>. The 
notation <FLAG=0> is meaningful only on a command other than 
stert to clear ea fleg that was previously set. Note that on 
all commands only the first three letters are scanned. 








SEQ 0010 
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2.4.2 Restart Commend - 


SEQ 6911 


SERRE OEEE EE ES OSES ESOS ODES OO066000006040000000000000004888 

RESC(TART)/TESTS: < TEST -LIST>/PASS: <PASS-CNT>/FLAGS : 
<FLAG-LIST>/UNITS: <UNIT-LIST> 

ROROEOEE OOS ESOS 6 6660 000000000000000000040000000000 400008 





2.4.2.1 Tests, Pass, And Flags Switches - 


<TEST-LIST>, <PASS-CNT>, and <FLAG-LIST> are as in the 
stert commend. 


2.4.2.2 Units Switch (/UNITS:<UNIT-LIST>) - <UNIT-LIST> IS 
A_ SEQUENCE OF DECIMAL NUMBERS (0,1 ETC.) OR RANGES OF 
DECIMAL NUMBERS (0-5, 8-10 ETC.) THAT SPECIFY THE UNITS TO 
BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. THE 
NUMBERS MAY RANGE FROM 0 THRU N-1 (N IS THE NUMBER OF UNITS 
SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMBER 
INDICATES THE POSITION OF THE P-TABLE AS THE DATA WAS 
ENTERED DURING THE HARDWARE DIAGLOGUE. THE UNITS WHICH ARE 
SELECTED MUST NOT HAVE BEEN DROPPED BY THE DROP COMMAND. 
SEE__THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
io = I ga ALL UNITS WHICH HAVE NOT BEEN DROPPED BY A DROP 


2.4.2.3 Effect Of Restart Command - 


The restart command differs from the stert commend in 
that the P-Tables from the previous start command (there 
must have been one) are used, instead of new ones being 
built. The softwere dialogue may optionelly be reexecuted 
Coperator will be asked). The command cen be used efter 
command mode hes been reentered in any of the three normal 
ways: e) the requested number of passes have been made, b) 
an error was encountered with the helt on error fleg set, or 
¢) a control/C was entered by the operator. 


2.4.3 Continue Command - 
$b666666066046666 66666600 60040000 06060006 00000006000006000004 


CONC TINUE )/PASS : <PASS-CNT/FLAGS : <FLAG-LIST> 
Pht p thot otto toe Tri titi ii iii titi ttt i ti ttt Tere ret 
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2.4.3.1 Fleg Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> Is seme es in the stert commend, but 
unspecified flegs retain their current velue. 


2.4.3.2 Effect Of Continue Command - 


Continue must follow e stert or restert, end commend 
mode must heave been entered due to a halt on error or e 
control/C. The effect of the command is to go to the 
beginning of the test that was being executed when the halt 
or control/C took plece. Software dialogue may optionally 
be reexecuted. Herdware peremeters may not be changed. 


2.4.4 Proceed Commend - 
$$6660000006660660606000000600066 06 060000000060606006000008 
PROCCEED)/FLAGS : <FLAG-LIST> 

$$06066000006060606606000000006 06060066060000600060006400008 


2.4.4.1 Flegs Switch (/FLAGS:<FLAG-LIST>) - 


<FLAG-LIST> Is es in the start command, but unspecified 
flags retain their current velue. 


2.4.4.2 Effect Of Proceed Commend - 


Proceed must follow ea stert, restert, or continue. 
Command mode must have been entered vie ea halt on error. 
The effect of the command is to begin execution at the 
location following the error cell. Neither herdwere nor 
software paremeters may be altered. 


2.4.5 Add Command - 
$6 66666060000000060600086000000600006060000006000000006008 
ADD/UNITS: <UNIT-LIST> 
$$66666006066 66060000600000060060 660060600000000000060000006066 


2.4.6 EFFECT OF ADD COMMAND - THE UNITS SPECIFIED ARE ADDED 
TO THE TEST SEQUENCE. EACH UNIT MUST HAVE A P-TABLE IN 
MEMORY DUE TO AN EARLIER HARDWARE DIALOGUE. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR CONTINUE. THE UNITS SWITCH 
MUST BE SPECIFIED. THE ADD COMMAND IS MEANINGFUL ONLY FOR 
UNITS THAT WERE PREVIOUSLY DROPPED. 





SEQ 0012 
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2.4.7 Drop Command - 


$6606 66066860666 66 6606 6666666606 666866 $6 6666 666868 6846866466688 


DROCP )/UNITS: <UNIT-LIST> 
RESSSEEEREESEESEESESERESESEEDEEEEEEESEESEESEEEESEEEEOEEESS 


2.4.8 EFFECT OF DROP COMMAND - THE UNITS SPECIFIED WILL BE 
DROPPED FROM TESTING. THE UNITS WILL BE RESELECTED ONLY BY 
THE EXECUTION OF AN ADD OR START COMMAND. THE UNITS SWITCH 
MUST BE ENTERED. THIS COMMAND MUST BE FOLLOWED BY A RESTART 
OR A CONTINUE COMMAND. 


2.4.9 Print Commend - 
6660606000600 0060000000600 6606060000000000000000000000000088 


PRICNT) 
$O66006666 600068066606 06006666666 6666 6666666066660 6606066460466 866 


2.4.9.1 Effect Of Print Command - Error summary reporting 
is = » acumen in this diagnostic, s0 this commend hes 
no effect. 


2.4.10 Display Command - 
6666600006006 660006 60060000060000060000600000060000000000008 


DISCPLAY)/UNITS : <UNIT-LIST> 
066660060 666606000006006006 0600000000 0600000000000000000808 


2.4.10.1 Effect Of Display Commend - 


The herdware P-Tebles for ell units ere printed in the 
formet in which they were entered. 


2.4.11 Flege Commend - 
06006 06600006 0006000000 0000060600 000000600600000000000000008 


FLACGS) 
SOS 666666 666666 SESE SESE SESEEEEEEEEEEEESESEEEEEEEEEEESEEEEEE 


2.4.11.1 Effect Of Flege Command - 
The current settings of ell fleges ere printed. 





SEQ 0013 
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2.4.12 Zflegs Commend - 
0000060600 6606006606646 0606 6060660066606 60606066 0666646666606 46066066864 


ZFLCAGS ) 


000000000 08066660000 606006 0600660600066 6606006006060600080466606064606068 


2.4.13 Zflaegs Command - 
All flegs ere cleared. 


2.4.14 Control Characters - 


C A control/C (C) entered during the execution of a 
diagnostic causes a return to command mode. 


Z A control/Z (2Z) entered — one of the two 
operator dielogues-- hardware P-Table dialogue or 
software P-Table dialogue causes the defaults to be 
taken for the remainder of that dialogue. 


0 A control/0 (0) entered during the execution of a 
diagnostic causes all teletype output to be 
surpressed for the remainder of the diagnostic or 
until enother control/0 is typed, which restores 
normal teletype output. 





SEQ 0014 


(ee eee ee a SD 
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2.5 HARDWARE QUESTIONS 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT THE 
USER FOR HARDWARE INFORMATION BY TYPING “CHANGE HW (L) ?” YOU MUST 
ANSWER “Y" AFTER A START COMMAND UNLESS THE HARDWARE INFORMATION HAS 
BEEN “PRELOADED” USING THE SETUP UTILITY (SEE CHAPTER 6 OF THE XXDP-+ 
USER'S MANUAL). WHEN YOU ANSWER THIS QUESTION WITH A “Y", THE RUNTIME 
SERVICES WILL ASK FOR THE NUMBER OF UNITS CIN DECIMAL). YOU WILL THEN 
BE ASKED THE FOLLOWING QUESTIONS FOR EACH UNIT: 


1. CSR ADDRESS - This question requests the CSR address of the 
specified DHV11. The default answer for this question is the 
lowest address in the PDP-11 hy aoe eddress space in which 
ea DHV11-M can be placed (160460 Octel). 


2. INTERRUPT VECTOR ADDRESS - This question requests the 
interrupt vector address of the specified DHV11. 


3. ACTIVE LINES BIT MAP - This question requests an octal bit 
map of the serial communication lines on the DHV11 which are 
being selected for testing. If the bit in the bit map is set 
which corresponds to e particular line (i.e. bit 3 for line 
3) that line will be tested by the FVT. 


4. BR Level - This questions requests the ‘nterrupt BR level of 
the DHV11. 


2.6 SOFTWARE QUESTIONS 


AFTER YOU MAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART OR 
CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 
PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 
OPERATION MODES. YOU WILL BE PROMPTED BY “CHANGE SW (L) ?” IF YOU 
WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING “Y”. The following 
Software P-Table questions are asked by the program if the operator 
indicates that the Software Parameters are to be changed: 


1. REPORT UNIT NUMBER AS EACH UNIT IS TESTED - This question 
asks whether the program should report the number of the unit 
which it is testing as it begins to test each unit. 


2. NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE - This 
question asks for the number of data errors which should be 
reported individually by this program for each line for each 
transmission test. Errors which are not reported 
individually are reported in summary error reports. 


3. ROM VERSION PRINTOUT ON THE FIRST PASS - This question asks 
whether the program should print out the versions of the on 
boerd 8051 processor ROMs during the first pass of the 
program. 





SEQ 0015 
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2.7 EXTENDED P-TABLE DIALOGUE 


WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES IN A 
TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST WAY TO 
BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH UNIT TO BE 
TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS A MASS STORAGE 
CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION DEVICE WITH SEVERAL 
LINES, THIS BECOMES TEDIOUS SINCE MOST OF THE ANSWERS ARE REPETITIOUS. 


TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING A 
FICTIONAL DEVICE, THE XY11. SUPPOSE THIS DEVICE CONSISTS OF A CONTROL 
MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. THESE UNITS ARE 
DESCRIBED BY THE OCTAL NUMBERS 0 THROUGH 7. THERE IS ONE HARDWARE 
PARAMETER THAT CAN VARY AMONG UNITS CALLED THE Q-FACTOR. THIS 
Q-FACTOR MAY BE © OR 1. BELOW IS A SIMPLE WAY TO BUILD A TABLE FOR 
ONE XY11 WITH EIGHT UNITS. 
@ UNITS (D0) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 2<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 2 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 1<CR> 
Q-FACTOR (0) 1 ? O<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 2<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 4 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 3<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 5 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 4<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 6 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? S<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 6<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


UNIT 8 
CSR ADDRESS (0) 160000<CR> 
SUB-DEVICE # (0) ? 7<CR> 


a 


SEQ 0016 
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‘Q-FACTOR (0) 12 <CR> 
NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 
AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 
NOT VERY EFFICIENT. 
THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
LETS BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


@ UNITS (D0) ? 8<CR> 


SEQ 0017 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0,1<CR> 
Q-FACTOR (0) 0 ? 1,0<CR> 


UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 2-5<CR> 
Q-FACTOR (0) 0 ? O<CR> 


UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 6,7<CR> 
Q-FACTOR (0) 0 ? 1<CR> 


AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE 

“-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE, SUB-DEVICES 
2. 3, 4 AND 5 WERE SPECIFIED. (CIF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN: ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 


@ UNITS (0) ? 8<CR> 


UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 0-7<CR> 
Q-FACTOR (0) 0 ? 0,1,0,..,,1,1<CR> 


-— 
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AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 


— 





SEQ 0018 
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2.8 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 
1. BOOT XXDP+ 


2. GIVE THE DATE AND ANSWER THE LSI AND SOHZ (CIF THERE 
IS A CLOCK AND THE QUESTION IS ASKED) QUESTIONS 


3. TYPE “R NAME”, WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 


TYPE “START” 
ANSWER THE “CHANGE HW” QUESTION WITH “Y” 
ANSWER ALL THE HARDWARE QUESTIONS 
7. ANSWER THE “CHANGE SW” QUESTION WITH “N” 
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE DEFAULTS FOR 


FLAGS AND SOFTWARE PARAMETERS. FOR DEFAULT INFORMATION SEE THE 
SECTIONS WITHIN THIS DOCUMENT ON FLAGS, AND HARDWARE QUESTIONS. 


SEQ 0019 


ao vf 


3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE “IER” FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 


THE GENERAL ERROR MESSAGE IS OF THE FORM: 


’ NAME TYPE~ NUMBER ON UNIT NUMBER TST NUMBER PC:XXXXXX 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR NUMBER 
UNIT NUMBER = 0 - N (N IS LAST UNIT IN PTABLE) 
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC: XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
ja, Hit OR “IBR” FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 
THESE MESSAGES ARE PRINTED AF TER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE “IER”, “IBR” OR "IXR” FLAGS ARE SET (SEE THE 


— 
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FLAGS SECTION OF THIS DOCUMENT). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 ERROR MESSAGES 


This program is intended to provide a go/no-go indication of the 

functionality of DHV11-M boards. To execute the program in this mode 
the operator can run with the inhibit basic error reporting switch. 

In this mode the program prints error messages which contain the error 

message header described above, plus the name of the failing test. 

For a list of the test names in this program see the test summaries 

section of this document. An exemple of such an error message is the 

following: ; 


CVDHA DVC FTL ERR 01603 ON UNIT 02 TST 015 SUB 000 PC: 015244 
DEVICE REGISTER WORD READ/WRITE TEST 


This error indicates that a fatal error was encountered within the 
test which tests the read/write capability of the DHV11-M registers. 


If the operator requires more extensive error reporting he can run 
with all error reporting enabled by not using the inhibit reporting 
switches. The above error message would then become the following: 


CVDHA DVC FTL ERR 01603 ON UNIT 02 TST 015 SUB 000 PC: ©15244 
DEVICE REGISTER WORD READ/WRITE TEST 
BAD BITCS) IN DEVICE TBUFFAD1 REGISTER FOR LINE 7 (D). 
EXPECTED DATA: 000000 (0). 
ACTUAL DATA: 000023 (0). 


SEQ 0020 
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4.0 PERFORMANCE AND PROGRESS REPORTS 


AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE TOTAL 
NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. THE “EOP” 
SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END OF PASS MESSAGE IS 
eh FOR FUTHER INFORMATION SEE THE SWITCHES SECTION OF THIS 





SEQ 0021 


5.6 TEST SUMMARIES 
The following tests are included within CVDHA: 


1. Device register address test - Verifies thet the UUT 
registers will respond witht the proper Q-BUS handshak ing 
when accessed. Verifies that the UUT is at the proper 
eddress. 


2. MASTER.RESET (Selftest) test - Verifies that the MASTER.RESET 
bit clears within a specified time of it being set. 


3. MASTER.RESET (Skip Selftest) test - Verifies that the 
MASTER.RESET bit clears within a short time after it is set 
if the skip selftest sequence is used. 


4. RX.CHARACTER field test - Verifies that the data bits of the 
codes in the FIFO after a reset and skip selftest are 
consistant with the skip selftest codes. 


5. Reception flag field test - Verifies that the 3 data status 
bits COVERRRUN, FRAMING, and PARITY error bits) are all set 
on all of the skip selftest codes in the FIFO after a reset 
and skip selftest sequence. 


6. RX.DATA.AVAIL test - Verifies that the RX.DATA.AVAIL bit is 
set when the skip selftest codes are in the FIFO and that it 
clears after they are read. 


7. RX.DATA.VALID test - Verifies that the RX.DATA.VALID bit is 
set for each valid skip selftest code in the FIFO and clear 
after all valid codes are read. 


8. RX.LINE field test - Verifies that the RX.LINE fields are 
correct for the skip selftest codes. 


9. BMP run test - This test runs the BMP and verifies that it 
does not fail within a specified period. This test should 
signel problems that the BMP codes could cause with later 
tests. 


10. Skip selftest test - This test verifies that if the selftest 
is skipped the proper codes are placed in the FIFO and that 
no errors are encountered. 





Toe: 
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11. 


12. 


13. 


14. 


15. 


16. 


17. 


18. 


19. 
20. 


21. 


22. 


23. 


24. 


2s. 


26. 





DIAGNOSTIC.FAIL (Skip selftest) test - This test verifies, by 
using the skip selftest sequence, that the DIAGNOSTIC.FAIL 
bit will go to both the active and inactive states. 


Selftest run test - Verifies that no errors are found by the 
execution of the selftest. 


Selftest fail test - Verifies that the selftest will report 
errors correctly when it is forced to fail. 


ROM version printout test - If requested, reports the version 
numbers of the 8051 ROMs. 


Word access read/write test - Verifies that the registers 
respond correctly to word read and write accesses. 


Word access read/modify/write test - Verifies that the 
registers respond correctly to read/modify/write word 
accesses. 


Byte access read/write test - Verifies that the registers 
respond correctly to byte read and write accesses. 


Byte access read/modify/write test - Verifies that the 
registers respond correctly to read/modify/write byte 
accesses. 


I0.BIT test - Verifies that the ID.BIT reads as a zero. 


No TX.DATA.VALID/No TX.ACTION test - Verifies that if a data 
word is written without the TX.DATA.VALID bit set, no 
TX.ACTION is generated. This test does not require that 
characters are TXed. 


TX.DATA.VALID / TX.ACTION test - Verifies that if a date word 
is written with the TX.DATA.VALID bit set, it generates a 
corresponding TX.ACTION. This test does not require that 
characters are TXed. 


TX.ENABLE inactive test - Verifies that if the TX.ENABLE bit 
is clear no transmission occurs. 


TX.ENABLE active test - Verifies that TX occurs if the 
TX.ENABLE is set. 


Interrupts test - Verifies that the TX and RX interrupts are 
functioning correctly. 


BR level test - Verifies that the UUT generates TX and RX 
interrupts at the correct BR level. 


DIAG field (BMP) test - Verifies that a request for BMP code 
reporting is answered by the UUT within the specified time. 





SEQ 0022 
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27. Report BMP codes test - This pseudo test reports the first 32 
BMP codes which were discovered in the FIFO during the 
execution of the other tests. This avoids the interruption 
of other tests by these codes, if they are not critical to 
the tests being performed. 


6.0 EXAMPLE ERROR FREE PASS 
The following is an example of an error free pass dialogue: 
-R CVDHADO 

CVDHADO.BIC 

ORS 

CVDHA-D-0 

DHV11-M FUNC TST PART1 

UNIT IS DHV11-M 

RESTART ADDR: 147670 

DR>STA 

CHANGE HW (L) 7? Y 

# UNITS (0D) ? 2 


UNIT 0 
CSR ADDRESS: (0) 160460 ? tZ 


UNIT 1 
CSR ADDRESS: (0) 160460 ? 160040 
INTERRUPT VECTOR ADDRESS: (0) 300 ? 320 
ACTIVE LINE BIT MAP: (0) 377 ? <CR> 
INTERRUPT BR LEVEL: (0) 4? <CR> 
CHANGE SW (L) 7 Y 
REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (L) Y ? <CR> 
NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON ALINE: (D) 02 4 
ROM VERSION PRINTOUT ON THE FIRST PASS: (L) Y ? 
TESTING UNIT : 0(D) 
ROM VERSION NUMBERS: PROC_1 = 2(D) PROC_2= 2(D) 
TESTING UNIT: 1(D) 
ROM VERSION NUMBERS: PROC_1 = 2(D) PROC_2= 2(D) 


CVDHA EOP 1 
O CUMULATIVE ERRORS 


pe UNIT : OCD) 
t 
DR> EXIT 





SEQ 0023 
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1 

1136 
1137 
1154 
1155 


re 


000000 


002000 


002000 


000001 
000001 
000001 
000001 
000001 


002000 





SEQ 0024 
-LIST SEQ,LOC,BIN,MEB 
-NLIST CND 
; L hatalatalalahalalalaialalatalainininlaialninisiniaitninisisinineininisnitit ine eee titi tit TT ttt tt tT tt TE TTT RTT TERT 
F 
3 VOHA .PHD 


; 
Hh halahalahalalalahatalainlaialainlaalsinitaininitlnniinninisiininnitii ieee tit itt Tt Tt ttt Titi LT Tie Thy 


-SBTTL Program Header 


-MCALL SVC 
svc s INITIALIZE SUPERVISOR MACROS 


hl alabatahatadalatababatalalalsialatelaisismiaaininininisisaisinaineiaimaeanamanceccceeiti 
; IF STRUCTURED MACROS ARE TO BE USED, ADD “.MCALL STRUCT” AND “STRUCT” 
; TO INITIALIZE THE STRUCTURED MACROS. 


SVCINS= 1 ; LIST INSTRUCTIONS, SHIFTED RIGHT 
SVCTST= 1 ; LIST TEST TAGS, SHIFTED RIGHT 
SVCSUB= 1 ; LIST SUBTEST TAGS, SHIFTED RIGHT 
SVCGBL= 1 ; LIST GLOBAL TAGS, SHIFTED RIGHT 
SVCTAG= 1 s LIST OTHER TAGS, SHIFTED RIGHT 


; CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 

: TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 

; SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 

a CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 

5 55S 56 Siu sa sel ah sg sc ae sl ag pg wl gn su ag gu uh ok pu 0 gg ae gk ss gh ok sg eh ed hd ee edd dd 


-ENABL ABS 
;-ENABL AMA 
. ad 2000 


BGNMOD 


3+ 
; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
gj? 


POINTER BGNRPT ,BGNSW,BGNSFT,BGNDU, ERRTBL 


HEADER CVDHA,D,0,16,0,PRIO7,1 
LSNAME:: 
«ASCII /C/ 
-ASCII /V/ 
-ASCII /0/ 
ASCII /H/ 
-ASCII /A/ 
-BYTE O 
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SEQ 0025 


























002006 000 BYTE 0 
002007 000 -BYTE O 
002010 LSREV:: 

002010 104 «ASCII /0/ 
002011 L$DEPO:: 

002011 060 «ASCII /0/ 
002012 LSUNIT:: 

002012 000000 -WORD 0 
002014 LSTIML:: 

002014 000016 -WORD 16 
002016 LSHPCP:: 

002016 036310 «WORD LS$HARD 
002020 L$SPCP:: 

002020 036502 -WORD LSSOFT 
002022 LSHPTP:: 

002022 002214 «WORD LSHW 
002024 L$SPTP:: 

002024 002226 «WORD L$SW 
002026 LSLAOP:: 

002026 037020 -WORD LSLAST 
002030 LSSTA:: 

002030 000000 «WORD 0 
002032 L$CO:: 

0C2032 000000 -WORD O 
002034 LSOTYP:: 

002034 000000 «WORD O 
002036 LSAPT:: 

002036 000000 «WORD O 
002040 LSOTP:: 

002040 002124 «WORD LSDISPATCH 
002042 LSPRIO:: 

002042 000340 -WORD PRIO7 
002044 LSENVI:: 

002044 000000 -WORD O 
002046 LSEXP1:: 

002046 000000 «WORD O 
002050 LSMREV:: 

002050 004 -BYTE CSREVISION 
002051 000 -BYTE CSEDIT 
002052 LSEF:: 

002052 000000 -WORD O 
002054 000000 «WORD 0 
002056 LS$SPC:: 

002056 000000 «WORD O 

00 LSDEVP:: 

002060 004036 -WORD LSDVTYP 
002062 LSREPP:: 

002062 024220 -WORD LSRPT 
002064 LSEXP4:;: 5 

002064 000000 -WORD O 
002066 LSEXPS:; 

002066 000000 t+) 







002070 LSAUT:: 
002070 000000 : P 0 #0 
002072 L$OUT:: 
002072 025134 «WORD L8DU 


002074 LS$LUN:: 
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L$DESP:: 

- WOR 
LSLOAD:: 

EMT 


LSETP:: 


LeIcP:: 
LScce:: — 


LSACP:: 


LSPRT:: 5 
LSTEST:: 


LSOLY:: * 
LOHIME:: 


0 
L$DESC 
ESLOAD 
LSERRTBL 
LSINIT 
LSCLEAN 
L$AUTO 
L$PROT 
1 

0 

0 





(eee er ee ee 
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1168 .SBTTL DISPATCH TABLE 

1169 

1170 poe 

1171 ; THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 

1172 ; IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

n= 

1174 

1175 002122 DISPATCH 27 
002122 000033 . WORD 
002124 LSDISPATCH: : 
002124 025252 . WORD 
002126 025542 - WORD 
002130 025756 
002132 026206 
002134 026370 
002136 026546 
002140 026750 
002142 027142 
002144 027334 
002146 027506 
002150 027706 
002152 030120 
002154 030366 
062156 030730 
002160 031314 
002162 031524 
002164 031740 
002166 032204 
002170 032454 
002172 032562 
002174 032772 
002176 033226 
002200 033526 
002202 034064 
002204 035076 
002206 035750 
002210 036226 

1176 


SEQ 0027 









NL eee ee er ener 
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SEQ 0028 
DISPATCH TABLE 
1184 
1185 ;SABASHE SACK BA AHAAESAEA AKAMA HASAGASAKCSSAKKEAADAAKHSAS AKAMA AAAS AS KAKA KO GSE KES 
1186 3 
tH b ~%; VOHA .OHT 
1 H 
1189  SCSACAKAAACKA SACK AAA SAA AY KAKKAK SANK HEASDATE KLAR AKAD EHAEKHKAD AAAS CAAA CASA NAE SSA Aa KA KEM dddS 
CEGUGEDS 
1190 
1191 
1192 
1193 .SBTTL DEFAULT HARDWARE P-TABLE 
1194 
1195 see 
1196 ; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
1197 ; THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
1198 ; IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
1199 ; AND IS USED AS A “TEMPLATE” FOR BUILDING THE P-TABLES. 
1200 == 
1201 
1202 002212 BGNHW OFPTBL 
002212 000004 -WORD L10000-L$HW/2 
002214 LSHW:: 
002214 
1203 
1204 002214 160460 -WORD 160460 ;Defeult CSR Address 
1205 002216 000300 -WORD 300 :Default Vector Address 
1206 002220 177777 -WORD 177777 ;Default Active lines bit map 
1207 002222 004 -BYTE 4 :Default BR Level 
1208 EVEN 
1209 
1210 002224 ENOHW 
002224 
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1212 
1213 


1214 
1215 
1216 
1217 
1218 
1219 
1220 
1221 
1222 
1223 
1224 
1225 
1226 
1227 
1228 
1229 
1230 


1231 
1232 
1233 
1234 
1235 


-— 


002224 
002224 
002226 
002226 


002226 
002230 


002232 
002232 





000002 


000021 
000000 















SEQ 0029 


MASALA SSS SAAS AS ASS SASS SASS SS ASKS KS STS AKASAKA AS ASSL SSAA SS SS SSK 


3 
3 VOHA .SWT 

3 

SESSA S AA AA ASA ASS ASASKSAAASAASASKSASAS AS ASSS SASK AA SASS SA SAAS SS ASS CSAS SS SSSA 


-SBTTL SOFTWARE P-TABLE 


zee 

; THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 

; PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
; i os — TIME AND MAY BE VARIED BY THE OPERATOR 
H . 


BGNSW SFPTBL 
-WORD L10001-L$SW/2 


L$SW:: 

SFPTBL:: 
OPTION: : -WORD 21 sbit map of program control flags 
NDERPT:: -WORD 0 sDefault number of individual data errors to rpt. 
ENDSW 

L10001: 
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SOFTWARE P-TABLE 


—— 


1237 
1238 


1239 


1240 
1241 


1 
1298 002232 





3 Led alabalalaiabaiahaiahataieialalalniininisinisininisiaisiniainiainininiainniaininiaiaieiaisimamomicieuicciicc EET 


VOHA .EQU 
Lehaiahatebaiabebalaiahateiainininininisininininiainininsinininiaigininaiaininueisnuieicinaieccnemen eT 


-SBTTL GLOBAL EQUATES SECTION 


3+ 


; THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
; ARE USED IN MORE THAN ONE TEST. 


peeeeee 


peeeeee 


NUMLNS ==10 


MAPLNS=*377 
DEVICE REGISTER 
CSRO==0 


RBUF O==2 
TXCHRO==2 
LPRO==4 
STATO=*6 
LNCTRO==10 
TXAD10==12 
TXAD20==14 
TXBFCO==16 


sNUMBER OF LINES ON DHV11 IS 8. 
sBIT MAP OF LINES ON DHV11. 


OFFSETS FROM THE CSR‘S ADDRESS seeaee 

sCSR REGISTER OFFSET FROM THE CSR ADDRESS 

sRECEIVE REGISTER OFFSET FROM THE CSR ADDRESS 

sTRANSMIT REGISTER OFFSET FROM THE CSR ADDRESS 

sLINE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 
sSTATUS REGISTER OFFSET FROM THE CSR ADDRESS 

sLINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 
sTRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADDRESS 
sTRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS 
sTRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 


EQUATES USED WITH RESPECT TO THE RX BUFFER ssesee 


RXBETX==16. 
RXBDTX==24, 
RXBFUL ==64. 


EQUALS 


; 
; BIT DIFINITIONS 


; 

BIT15== 
BIT14== 
BIT13== 
BITi2== 
BITii== 
BIT10== 
BITO9== 
BITO8== 
BITO7== 
BITO6== 
BITOS== 
BITO4== 
BITO3== 


10 


BITO2== 4 
BITO1== 2 


;sLEVEL OF RX BUFFER AT WHICH TO RE-ENABLE TRANSMISSION. 
sLEVEL OF RX BUFFER AT WHICH TO DISABLE TRANSMISSION. 
sTOTAL CHARACTER CAPACITY OF THE RX BUFFER. 















SEQ 0030 
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SEQ 0031 
GLOBAL EQUATES SECTION 
000001 BITOO== 1 
; 
001000 BIT9== BITO9 
000400 BIT8== BITOs 
000200 BIT7== BITO7 
000100 BIT6== BIT06 
000040 BITS== BITOS 
000020 BIT4== BITO4 
000010 BIT3== BITO3 
000004 BIT2== BITO2 
000002 BITi== BITO1 
000001 BITO== BITOO 


; 

; EVENT FLAG DEFINITIONS 

+ EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
; 


; ; BIT POSITION IN SECOND STATUS WORD 
000040 EF .START== 32. s €100000) START COMMAND WAS ISSUED 
000037 EF .RESTART== 31. s €040000) RESTART COMMAND WAS ISSUED 
000036 EF .CONTINUE== 30. ; (020000) CONTINUE COMMAND WAS ISSUED 
000035 EF .NEW== 29. s €010000) A NEW PASS HAS BEEN STARTED 
000034 EF .PWR== 28. s (004000) A POWER-FAIL/POWER-UP OCCURRED 


; 
; 
; PRIORITY LEVEL DEFINITIONS 


000340 PRIO7== 340 
000300 PRI06== 300 
000240 PRIOS== 240 
000200 PRI04== 200 7 
000140 PRIO3== 140 
000100 PRIO2== 100 
000040 PRIO1== 40 
000000 PRIOO== 0 

; 

sOPERATOR FLAG BITS 

3 « 
000004 EVL== a 
000010 LOT== 10 
000020 ADR== 20 
000040 I0U== 40 
000100 ISR== 100 
000200 UAM== 200 
000400 BOE== 400 
001000 PNT== 1000 
002000 PRI== 2000 
004000 IXE== 4000 
010000 — IBE== 10000 
020000 IER== 20000 
040000 LOE== 40000 
100000 HOE== 100000 


1299 


—— 
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SEQ 0032 

GLOBAL EQUATES SECTION 

1301 

1302 {SAC KC SSS KS SSSA SAAS SSSA SASK A ASKS SAAS KKK AKASAKA eS 

1303 ’ 

tot : VOHA .GOT 

1 ; 

1306 ;SLSCMCA CSAS GSAS AKASAKA SAAS SRSA SKSK KSLA AKASAKA SCKKSSSSKKKG KAKA SKA KAKA SSW 

1307 

1308 

1309 

1310 -SBTTL GLOBAL DATA SECTION 

1311 

1312 Prey 

1313 ; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

1314 ; IN MORE THAN ONE TEST. 

1315 ’ s-- 

1316 

1317 PIT ti ii ret it iii i titi tit titi titi ttt tT ttt TT TTT TTT TTT TTT TTT TTT TT TTT TTT 

1318 ; Unit Varible Area 

1319 3990000006 64460066 646066666466 66646 646664 046466606646 046460646 4666464464 6446464444466 44% 

1320 

1321 002232 000300 RXVECA:: .WORD 300 3RX VECTOR ADDRESS. 

1322 002234 000304 TXVECA:: .WORD 304 ;TX VECTOR ADDRESS. 

1323 002236 000377 ACTLNS:: .WORD 377 sACTIVE LINE BIT MAP. 

1324 0C2240 000000 UNITN:: .WORD 0 sUNIT NUMBER. 

1325 002242 004 BRLEVL:: .BYTE 4 sINTERRUPT BUS REQUEST LEVEL 

1326 .EVEN ' 

1327 

1328 PITTI rir titi iii tert iti titi titi ttt tt ttt ttt tT TT TT TTT TTT TT TTT TTT TTT 

1329 H Device Register Address Table 

1330 PEIPIII Titi tii ti ttt i itt itt ttt tt TTT TTT TTT TTT TTT TTT TTT TT TT TT TTT TTT 

1331 002244 DRADRT: : 

1332 002244 160020 CSRA:: .WORD 160020 ;DHV11-M CSR ADDRESS 

1333 002246 160022 TXCHA:: RBUFA:: .WORD 160022 ;DHV11-M RECEIVE/TRANSMIT BUFFER ADDRESS 

1334 002250 160024 LPRA:: .WORD 160024 ;DHV11-M LINE PARAMETER REGISTER ADDRESS 

1335 002252 160026 STATA:: .WORD 160026 ;DHV11-M STATUS REGISTER ADDRESS 

1336 002254 160030 LNCTRA:: .WORD 1600350 ;DHV11-M LINE CONTROL REGISTER ADDRESS 

1337 002256 160032 TXAD1A:: .WORD 160032 ;DHV11-M TRANSMIT BUFFER 1 REGISTER ADDRESS 

1338 002260 160034 TXAD2A:: .WORD 160034 ;DHV11-M TRANSMIT BUFFER 2 REGISTER FDORESS 

yo 002262 160036 TXBFCA:: .WORD 160036 ;DHV11-M TRANSMIT BUFFER COUNT REGISTER ADDRESS 

1341 

1342 Pret iriri iii t iti i titi iit tittiititttttit titi ttt ttt TT TT TT TT TT TT TTT TTT 

1343 3 Bit mask table of un-used DHV device register bits. 

1344 RORREEEEREEEE SEES EEE KEES ED EEE ES SE EEEEES OE EEEEED DEERE EEEEEEEEEEEEEEEEE 

1345 002264 137660 UNBTTB::.WORD 137660 ;UNUSED BIT MASK FOR THE CSR 

1346 002266 177777 -WORD 177777 ;UNUSED BIT MASK FOR THE RBUF/TX REG 

1347 002270 000007 -WORD 7 s;UNUSED BIT MASK FOR THE LPR 

1348 002272 177777 -WORD 177777 ;UNUSED BIT MASK FOR THE STAT 

1349 002274 166051 -WORD 166051 ;UNUSED BIT MASK FOR THE LNCTRL 

1350 002276 000000 «WORD O sUNUSED BIT MASK FOR THE TBUFFADL 

1351 002300 077700 -WORD 77700 #£;UNUSED BIT MASK FOR THE TBUFFAD2 

ae 002302 000000 -WORD 0 sUNUSED BIT MASK FOR THE TBUFFCT 

1354 FEREREESAAEREEAEEEAEREEEESEEEEESEAEAES KE EE EEEEEEEEEEEEEEEEESEEEEEKEEEEEEEARE REE 

1355 8 Register Message Address Table 

1356 § 9664040006606 6466606646 06446644646 64664666 64646406 0464646 6460664606464646 46460646446 6444048 44460444644464404% 

1357 002304 006004 RMATBB:: .WORD DROOMG ;ADDRESS OF “CSR” MESSAGE. 





-— 





————— OO 
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GLOBAL DATA SECTION 


—— 


1358 


002306 


1359 002310 





002312 
002314 
002316 
002320 
002322 


002324 
002326 
002330 
002332 
002334 
002336 
002340 
002342 
002344 
002346 
002350 
002352 


002354 
002356 
002360 
002362 
002364 
002366 
002370 
002372 
002374 
002376 


002400 
002402 
002404 
002406 


002410 
002412 
002414 
002416 
002420 
002422 
002424 
002426 


177572 
000000 
000000 
172340 


-WORD ORO2MG ;ADDRESS OF “RBUF” MESSAGE. 
-WORD ODRO4MG ;ADORESS OF “LPR” MESSAGE. 
-WORD ODRO6MG ;ADDRESS OF “STAT” MESSAGE. 
-WORD DRIOMG ;ADDRESS OF “LNCTRL” MESSAGE. 
-WORD OR12MG ;ADDRESS OF “TBUFFAD1” MESSAGE. 
-WORD ORi4MG ;ADDRESS OF “TBUFAD2” MESSAGE. 
-WORD ORI6MG ;ADDRESS OF “TBUFFCT” MESSAGE. 


HD haceahasachcatedahtehate hehe bth be thet Ltt LLL LLL T tit TTT TTT TTT TTT TTT Te TTT TTT TTT 

; Assorted global variables: 

FT haceahachatcatadeehatncacadecahehte nent LLL LLL LLL LLL LLL TTT TTT TT TT TTT TTT TTT TTT Tt 
BUFPTR:: .WORD sSTORAGE FOR RECEIVE CHARACTER BUFFER POINTER. 
TSTNUM:: .WORD sSTORAGE FOR THE TEST NUMBER. 

IESTAT:: .WORD sSTORAGE FOR THE INTERRUPT ENABLE BIT STATES. 
PASCNT:: .WORD sSTO'G FOR PASS COUNT USED IN ROM VERSION@ TST. 
: sSTORAGE FOR RECEIVER INTERRUPT FLAGS. 

sSTORAGE FOR RECEIVER INTERRUPT FLAGS. 

sSTORAGE FOR TRANSMIT INTERRUPT COUNT. 

sSTORAGE FOR TRANSMIT INTERRUPT FLAGS. 

sSTORAGE FOR THE NORMAL 004 TRAP VECTOR. 

sFLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS. 

sLOCATION FOR PASSING INDIRECT PARAMETERS. 

sSTORAGE FOR THE CONTROL-C FLAG. 


FD chadacaahcaetachtaeet ett tie LLL TTL LiL TTT LTT TTT TTT TTT TT TTT TT TTT eT TT Tt 
: Line Time Clock variables and storage. 
jPROREEEEEEEOE OSES 660404 000606000606 0008 0000040040004 OOS Eh dh hE Ee eEe 
CLKCSR:: .WORD 177546 ;CSR ADDRESS OF THE LTC. 
CLKBRL:: .WORD PRIO6 ;INTERRUPT PRIORITY LEVEL OF THE LTC. 
CLKVEC:: .WORD 100 sINTERRUPT VECTOR ADDRESS OF THE LTC. 


~4 

x< 

Lon) 

z 

+ 

oO 

xz 

o 
oooooooocooro 


CLKHRZ:: .WORD 60. sINTERRUPT FREQUENCY OF THE LTC. 
TIMER1:: .WORD 0 sHARDWARE CLOCK COUNTER #1. 
TIMER2:: .WORD 0 sHARDWARE CLOCK COUNTER @2. 


TIMERS:: .WORD 120. sHARDWARE BREAK COUNTER LOCATION. 
BCOUNT:: .WORD 120. sBREAK COUNT VALUE IN CLOCK TICKS. 


MSTICK:: .WORD 17. sNUMBER OF MILLI-SECONDS PER LTC TICK. 

MSLCNT:: .WORD 62 sLOOP COUNT CUSED BY MSLOOP) TO DELAY 1 MS. 
Tha cacetaatae aaah eet tL TTL TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT eT TTT es 
; Memmory Management Variables and Flags. 


jPRREREEESESEEEEEEEEEEEEEE EE ESD EEEEEDEREE ED ES ESOS ES OO 48 44000404000000000040 00084 
MMSRO:: .WORD 177572 ;ADDRESS OF MEM MGT STATUS REGISTER #0. 
MMPRES:: .WORD 0 sMEM MGT PRESENT FLAG (O IF MM NOT PRESENT). 
MMENAB:: .WORD 0 sMEM MGT ENABLED FLAG (0 IF MM NOT ENABLED). 
PAROA:: .WORD 172340 ;ADDRESS OF MEM MGT PAR #0. 


j HERES EEEEEEEE EEE EE ES 64066004 40046060604000600060006040008 00046 000000000000440008 
F Table of words with corresponding bit set for generation of bit maps. 

jSERRSEEEEEEEARESAEEEEEEEEEEEEEEEEEEAE DEDEDE EERE EEED DEES OE ODED EE OD ODED EEEEEEEES 
BITTBL:: .WORD 1 ;BIT O SET. 


-WORD 2 sBIT 1 SET. 
-WORD 4 sBIT 2 SET. 
-WORD 10 sBIT 3 SET. 
-WORD 20 sBIT 4 SET. 
-WORD 40 sBIT S SET. 
-WORD 100 sBIT 6 SET. 
-WORD 200 sBIT 7 SET. 





SEQ 0033 
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GLOBAL DATA SECTION 


1415 


1470 


r-— 


002430 
002432 
002434 
002436 
002440 
002442 
002444 
002446 


000000 


000000 


000000 
000000 
000000 
000000 





-WORD 400 sBIT 8 SET. 

-WORD 1000 sBIT 9 SET. 

-WORD 2000 sBIT 10 SET. 

-WORD 4000 sBIT 11 SET. 

-WORD 10000 sBIT 12 SET. 

-WORD 20000 ;BIT 13 SET. 

«WORD 40000 sBIT 14 SET. 

-WORD 100000 sBIT 15 SET. 
rrr rer rire rrr reer retire titi ii titi t ttt ri ttt tt TTT TTT TTT TTT TT TTT TTT TT TTT 
3% GPR Save Area Zero. 
RERERAAEEEREREERESEERERAEEAEAERESSEEEERSESEERESERAREEESEREAEEEE DEEDES EREEREEEE 
GPRSOB: : s;BASE OF GPR SAVE AREA NUMBER ZERO. 

-WORD 0 sWORD 1, STORAGE FOR R1. 

-WORD O sWORD 2, STORAGE FOR R2. 

-WORD O sWORD 3, STORAGE FOR R3. 

-WORD 0 sWORD 4, STORAGE FOR R4. 

-WORD 0 sWORD S, STORAGE FOR RS. 
RERRAEEAEEEREEEAEREREEEERESEEEEEE REESE EREEEEEEEEED DEES EE OS EE EEEDEEEE REED EREEEES 
3% Transmission and Reception Variables, Pointers, and Flags. 
REREEREEREEREEEEREEESEEEEESEEEEEE ES EEEEES EE EEEEDSEEEEEEEAEEEEEEEEES EE EREREEEDE 

ERSMRF:: .WORD 0 sERROR SUMMARY REPORT FLAGS. 

ERCNTB:: .BLKW 16. ;TABLE OF ERROR COUNTERS. 
RRRAREEEEEREEEE SEES EEEEEE REESE SEES ES EEEEEE ES EEEE ESE OEEEEDEE EERE EEEEEREDEREEEEREDS 
F Storage area for the BMP code queue. 
Pict titi eT Piette iii ti tii tt iti it ii titi ti tit ttt tT TTT TTT TTT TTT TTT TTT TT TTT 
BMPCQP: : -WORD O sPOINTER USED TO ACCESS THE NEXT CELL IN QUE. 
BMPCQB: : -BLKW 64. sSTORAGE FOR 32 CELLS, TEST@ PLUS BMP CODE. 
BMPCQE: : sLAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 
{SERRE EREREREEAEEREEEEAERE AREAS EERE SEED REESE EEEEES EE OEEEEEEEEEEEEEEEEEESEEEEERE 
; General table and buffer area--513 words. 
jPRREREKEREEEEEE EERE EE AEEEES EE EE EE OEE ED OD EEEEEEEEEEEEESDEEEREEEEEEREEEERERERREEE 
BUFBAS:: sBASE OF MEMORY BUFFER. 
ERLTBL:: -BLKW 128. sFIRST HALF OF GENERAL TABLE OR SUFFER. 
BUFMID: : -BLKW 64. sSECOND HALF OF GENERAL TABLE OR BUFFER. 
BUF3QT:: -BLKW 64. sLAST QUARTER OF THE BUFFER AREA. 
BUFEND: : sEND OF GENERAL PURPOSE MEMORY BUFFER. 
ENDETB: : -BLKW = 16. ;BUFFER OVERFLOW SPACE. 

ERRTBL 

LSERRTBL:: 

ERRTYP:: -WORD O 
ERRNBR: : «WORD O 
ERRMSG: : -WORD O 
ERRBLK:: -WORD 0 

-EVEN 



















SEQ 0034 









1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
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GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 


-SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 
'F cadaciatachatashecnttashacacesnhteshtnhtechcehteen thee i Lt t LLL TTT TTT TT Tt tt 


3% There are 4 routines and macro definitions used for the handling of 
7% GPR values during subroutine calls within this program. The four 
3% routines/macro calls have the following names: 

;* 

:* SAVE - Macro definition used at the beginning of a subroutine to 

3* save the GPR contents for later restoration. 

3* PASS - Macro definition used at the end of a subroutine to restore 
;* the previously saved GPR contents and to leave the contents 
3% of the specified GPR(s) intact (NOT restored). 

3% PREGOS - Subroutine which is called from the SAVE and PASS macro 

:* expansions which actually performs the actions on the GPRs. 
3* 

3* During a subroutine which uses these GPR save routines the values 
3* of the GPRs are stored on the stack in the following stack frame: 
;* 

i* SP -> RET PC INTO PREGOS ROUTINE. 

3% SP+2 -> GPR RO CONTENTS. 

3% SP+4 -> GPR R1 CONTENTS. 

3% SP+6 -> GPR R2 CONTENTS. 

3* SP+8 -> GPR R3 CONTENTS. 

:* SP+10 -> GPR R4 CONTENTS. 

3% SP+12 -> GPR RS CONTENTS. 

3% SP+14 -> RET PC INTO CALLER OF SUB‘ TNE WHICH CALLED PREGOS. 
;* 

7* Each level of sub'tne calling uses 8 words of stack overhead. 

3% The SAVE and PASS macros can also be used in “straight line code” 
34 to save and restore the GPR values. In any case, after the 

3% issuing of ea PASS call the GPRs will be restored to the values 

3% they had prior to the last SAVE call (except for the excepted, 

;* or passed intact, GPRs specified as parameters to the PASS call) 

3% and the SP will also be restored to its condition before the last 
7* SAVE call. The programmer must be sure that the SP has the same 

7% value when the PASS macro is called as it had immediately after 

;* the SAVE macro was called. 


FRRERREEAEREEEEAEAERERESESEEAREAEAEREAAASEEERESAASREEARAEEEAAREARELREALRAE REELS 
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GPR FRAME ACCESS EQUATES 


SEQ 0036 


1 -SBTTL GPR FRAME ACCESS EQUATES 

1 s+ee 

1512 sEquates that allow access to the stack frame. These are the 
1513 soffsets into the stack for registers saved during the PREGOS 
1514 sroutine. 

1515 s--- 

1516 

1517 000036 LPCSLT== 36 sOffset for last return PC. 

1518 000016 PCSLOT== 16 ;Offset for return PC 

1519 000014 RSSLOT== 14 :0ffset for R5. 

1520 000012 R4SLOT== 12 :O0ffset for R4. 

1521 000010 R3SLOT== 10 :Offset for R3. 

1522 000006 R2SLOT== 6 :Offset for R2. 

1523 000004 RiSLOT== A :Offset for R1. 

1524 000002 ROSLOT== 2 - :O0ffset for RO. 


eas 
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GLOBAL MACRO DEFINITION 
-SBTTL GLOBAL MACRO DEFINITION - SAVE - 

Porritt rrr iiiititititititiiiiititititittiititiiitiiiti tit iitttt tty 
This macro is used at the beginning of a subroutine to save the 
contents of the GPRs RO thru RS. 


INPUTS: SP - Unche since subroutine was entered 
OUTPUTS: GPR save area on the stack is loaded with the contents of GPRs 


CALLING SEQUENCE: SAVE 

COMMENTS: No arguments ere allowed. 

:* SUBORDINATE ROUTINES CALLED: PREGOS. 

Ohh hb hb hhhhhe ehhh 00h 046404 46 66606060000006 0606046006 0040000000000000000000008 


-MACRO SAVE 
-LIST 


-NLIST 
-ENDM SAVE 






SEQ 0037 


RSSLOT - OF set to stack slot for R5 (Equated to 14 Octal) 


TOP OF STACK - Loaded with the return address into PREGOS 


The PASS macro should be called to restore the GPR values. 


JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
















GLOBAL MACRO DEFINITION - PASS - 
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-NLIST 
1598 -ENDM PASS 


-SBTTL GLOBAL MACRO DEFINITION - PASS - 


1552 § 9066660660600 6666 000006 0600000000000004000000000000000000000000000000000000008 
1553 3% This macro is used in conjunction with the SAVE mecro. It is 
1554 34 called at end of ea subroutine to pess peremeters in GPRs beck to the 
1555 3% calling routine by eltering the GPR seve erea on the stack and then 
cant 3% returning to PREGOS to restore the GPRe to their saved velues. 
3% 
1558 3@ INPUTS: onat ellowed ARGUMENTS ere “RO” thru “RS”. 
1559 3% ROSLOT thru RSSLOT aust be equeted to their respective GPR seve 
+ 3* slot offsets before calling this macro. 
3% 
fo 3@ OUTPUTS: The GPR velues are put in their respective slots on the steck. 
3* ‘ 
[a4 3@ CALLING SEQUENCE: PASS RO,R1,... 
i 2 e 
1566 :@ COMMENTS: Any combination of GPR erguments — be listed in eny order. 
1567 3% For exemple, the following ere legal: 
1568 ;* PASS Ri 
1569 28 PASS R4,RO,R2 
1570 3% The GPRs listed es arguments will be passed intect to the 
1571 73 calling routine, all other GPRse will be restored. 
ise 3% The SP must be at its original value when PASS is celled. 
3% 
1574 -¢ The macro cell 
1575 ie PASS RO,R3 
1576 sa expands into the following essembly code: 
1577 3* MOV RO,ROSLOT( SP) sPUT RO IN STACK SLOT. 
1578 36 MOV R3 ,R3SLOTC SP) sPUT R3 IN STACK SLOT. 
1579 ye JSR PC .OCSP)+ sRETURN TO PREGOS SUBRT. 
1580 34 In this exemple GPRs R1, R2, R4, and RS will be restored to 
1581 3% their values contained in the steck frame end RO and R3 
i 3% will be left eat their values prior to this PASS cell. 
3% 
1584 s# SUBORDINATE ROUTINES CALLED: (PREGRT - Lebel within PREGOS, velue on steck. ) 
1585 § #06 060666606060060006000006060006000060000660000000000060000000000000000000000008 
1586 
1587 .MACRO PASS A.6.C,0,E,F 
1588 .IRP X,<A,B.C,0,E,F> 
1589 IF NB ,X 
1590 LIST 
1591 MOV X,X‘ SLOTC(SP) sPUT X IN STACK SLOT. 


JSR PC .OCSP)+ sRETURN TO PREGOS SUBRT. 
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GLOBAL SUBROUTINE - PREGOS - 

-SBTTL GLOBAL SUBROUTINE - PREGOS - 
1601 §0O000000006 000006 000000 06 006000000006 0006000060000000000060000000000000000000008 
Preserve Registers RO through RS for subroutine cells. 


The return eddress beck into the celli 

























routine must be in 


sees 34 GPR RS. Ci.e.- Mecros use “JSR R5,PREGOS”.) 
3% 
od 3@ OUTPUTS: Registers RO through RS ere saved on the stack. 
3% 
1609 s#CALLING SEQUENCE: SAVE sMecro expension cells PREGOS. 
1610 34 (Subroutine code]... 
at re PASS sMaecro expansion recalls PREGOS. 
3% 
aa :*COMMENTS: This routine is re-entrent. 
3% 
1615 3e Peremeters may be passed out of e subroutine by modifying the 
1616 3% register save erea on the steck. Use the PASS GPRn macro 
1617 3% to return GPR velues intect. 
1618 3% Use the RnSLOT offsets from the SP to pass other perenmeters. 
1619 3% (Exemple: MOV VALUE , ROSLOT(SP) ) 
ry 34 Make sure the SP is et ite original velue when you do this. 
3% 
1622 s*SUBORDINATE ROUTINES CALLED: None. 
1623 $ $6006 666006600600 0006000000 0000 0006000000 000000000000006000000060000006000000006 
1624 
1625 003776 PREGOS : 3RS HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 
1626 003776 010446 MOV R4,-CSP) sSAVE R4 
1627 004000 010346 MOV R3,-C(SP) sSAVE R3 





VE 
1631 004010 010546 MOV RS,-CSP) 3:PUSH RETURN PC ON TOP OF STACK 
—e 004012 016605 000014 MOV RSSLOTC(SP).RS $;RESTORE RS TO VALUE IT HAD BEFORE CALLS 
1634 004016 004736 JSR PC ,@CSP)+ 1Cell the subroutine et the return eddress 
1635 ifrom the PREGOS cell, putting the present 
1636 sPC on the steck es e return eddress into 
1637 sthie (PREGOS) routine. 


1639 poee 
1640 sThe following code is executed when the celling routine does e 
1641 s“return” (J PC,@(SP)+) using the PC deposited on the stack ebove. 





1644 004020 012605 PREGRT:: MOV (SP), RS sPut return PC in RS. 

1645 004022 012600 MoV (SP)+,RO sRestore RO. 

1646. 004024 012601 MOV (SP)+,R1 Restore R1. 

1647 004026 012602 MOV (SP)+,R2 sRestore R2. 

1648 004030 012603 mov (SP)+,R3 sRestore R3. 

_. 004032 012604 MOV (SP)+,R4 sRestore R4. 

1651 004034 000205 RTS RS sReturn to the subroutine which celled PREGOS. 


1652 srestoring RS in the process. 





ee ee 
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GLOBAL TEXT SECTION 


1684 
1685 
1692 


-— 


110 
261 
00 


126 
oss 





SEQ 0040 


-SBTTL GLOBAL TEXT SECTION 
;SSKSKAASS SK SAAK SS SSSS SKS TS SAK SKK SKSAAA ASST S SACS AAAS SSAA AA SSAA AAAS SSSA SKA SS 


; 
; FVTSKL1.P11 


° 
;, SACKS MAAC EK SANS AKASH ASTANA SG SCSA AS AICK GS AKAKASKAAHNE SASK AKASAA SSAA ASSESS Sh ahd aa de 


ee 

; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
; MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 

; MORE THAN ONE TEST. 

lined 


; 
3 NAMES OF DEVICES SUPPORTED BY PROGRAM 
DEVTYP <DHV11-M> 


LSOVTYP:: 
-ASCIZ sDHV11-Ms 


-EVEN 
; TEST DESCRIPTION 
; 


DESCRIPT <DHV11-M FUNC TST PART 1> 
L$DESC:: 





-EVEN 





-ASCIZ /OHV11-M FUNC TST PA 
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-— 





1694 
1695 


1696 
1697 
1698 








SEQ 0041 


jSSSCAACAS ASAT AA AACA AAAS SSAA ASKS SS ASASSS SASS SS SAAS SAAS ASS SAAS KS SAA SKS SASS SSeS 


VOHA .FMT 


° 
3 
3 
SASS AS SS AKAK AAAS AAAS KATA SSSA SSKS SSAA ASST SAAS ASA AAAS SSAA ASA AS SSSA eS 


; 
; FORMAT STATEMENTS USED IN PRINT CALLS 
; 
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SEQ 0042 
GLOBAL TEXT SECTION 

1727 

1728 hh al ahaiahatalaaatalatalallainininlalniaiaitninininininininininiaiiiiiiiiiiiiunit titi tit tit tt tT TTT ET PT PE hE REP En en 

1729 3 

Bg 3 VOHA .MSG 

1731 3 

1732 Ts hatahatalalnhatatatalaialsiniainlnilninininlsalnininininnininininiiiiiii iii titi tit tt ttt tL LTT TL RTT TL TE ET REMI en 
he 

1733 

1734 

1735 -NLIST BIN 

1736 -SBTTL GLOBAL MESSAGE AREA 


1737 3 #eaeeaaeee FORMAT STATEMENTS eeeeeeacae 
1738 004076 MFUNIT:: .ASCIZ /sNSA TESTING UNIT :8D48A‘D)SN/ 

1739 004134 EFOSO3:: .ASCIZ /sTsSN/ 

1740 004141 EFOSOS:: .ASCIZ /#A SDSSA ILLEGAL INTERRUPTS RECEIVED. sN/ 

1741 004214 EF1401:: .ASCIZ /sNSA ROM VERSION NUMBERS: PROC_1 = sD2sA(D) PROC_2 = sD28A(D)sN/ 
1742 004316 EF1402:: .ASCIZ /sSTSA ROM VERSION NUMBER STSN/ 

1743 004353 EF1601:: .ASCIZ /SA TSA ABORTED “N/ 

1744 004377 EF1602:: .ASCIZ /#A EXPECTED DATA: 068A (0).SN/ 

1745 004441 €F1603:: .ASCIZ /#A ACTUAL DATA: SO068A (0). SN/ 

1746 004503 EF1604:: .ASCIZ /sA BAD BIT(S) IN DEVICE TSA REGISTER FOR LINE SD28A (D).SN/ 
1747 004600 EF3001:: .ASCIZ /#A EXPECTED OR CORRECT VALUE: #03sN/ 

1748 004647 EF3002:: .ASCIZ /sA ACTUAL OR MEASURED VALUE: #03sN/ 

1749 0C4716 EF9001:: .ASCIZ /SA UNEXPECTED TSA FOUND IN RECEIVE CHAR FIFO:sN/ 

1750 005000 EF9002:: .ASCIZ /#A CODE IS ASSOCIATED WITH LINE: #D2sA(D)sN/ 

1751 005057 EF9003:: .ASCIZ /#A CODE IS: #03sA(0)sN/ 

1752 005113 EF9004:: .ASCIZ /#A STSA VALUE: #038A(0)SN/ 

1753 005150 EF9005:: .ASCIZ /#A STSA VALUE: NONESN/ 

1754 005201 EF9006:: .ASCIZ /SA TSA SD2SA(D)SN/ 

1755 005225 €F9010:: .ASCIZ /#A NUMBER OF ERRORS DETECTED ON LINE SD2s8A(D) IS sDSSA(D)SN/ 
1756 005324 EF9016:: .ASCIZ /SA UNEXPECTED TSA FOR LINE sD2sA(D) IN FIFO AFTER RESET : sN/ 
1757 005421 EF9017:: .ASCIZ /#A STSA CWITH ERROR FLAGS) IS s068A(0)SN/ 

1758 005475 EF9018:: .ASCII /SA TSA IN SELFTEST CODE FIFO SLOT FOR LINE #D2/ 

1759 005555 -ASCIZ /SACD) AFTER RESET. SN/ 

1760 005602 E€F9019:: .ASCIZ /SA STA S068A(0)8N/ 

1761 005626 EF9301:: .ASCIZ /SA STSD2SA(D), BMP CODE REPORTED :#038A(0)sN/ 

: .ASCIZ /SA OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE)SN/ 
1763 3#eeeeeeee ERROR MESSAGES seeeseceeeese 

1764 006004 DROOMG:: .ASCIZ /CSR/ 

1765 006010 DRO2MG:: .ASCIZ /RBUF/ 

1766 006015 DRO4MG:: .ASCIZ /LPR/ 

1767 006021 DRO6MG:: .ASCIZ /STAT/ 

1768 006026 DRIOMG:: .ASCIZ /LNCTRL/ 

1769 006035 DR12MG:: .ASCIZ /TBUFFADI/ 

1770 006046 DR14MG:: .ASCIZ /TBUFFAD2/ 

1771 006057 ORI6MG:: .ASCIZ /TBUFFCT/ 

1772 006067 EM0103:: .ASCIZ /DEVICE REGISTER ACCESS ERRORS/ 

1773 006125 EMO201:: .ASCIZ /MASTER RESET (PERFORM SELFTEST) TEST / 

1774 006173 EMO202:: .ASCIZ / MASTER RESET BIT DID NOT CLEAR AFTER BOARD RESET./ 


1775 006257 -ASCIZ / WAITED S SECONDS. BIT DEFECTIVE OR FIRMWARE HUNG. / 
1776 006346 EMO203:: .ASCIZ / MASTER RESET BIT CLEAR IMMEDIATELY AFTER BOARD RESET./ 
1777 006436 -ASCIZ / BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

1778 006511 EM0204:: .ASCIZ \ MR BIT WENT CLEAR WITHIN 1/2 SECOND OF BOARD RESET.\ 
1779 006577 -ASCIZ / BIT DEFECTIVE OR SELFTEST WAS (INCORRECTLY) SKIPPED. / 


1780 006670 EM0301:: .ASCIZ /MASTER RESET (SKIP SELFTEST) TEST / 

1781 006733 EMO302:: .ASCIZ / MR BIT CLR WITHIN 10 MILISECOND AFTER BOARD RESET./ 
1782 007020 -ASCIZ / BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

1783 007073 EMO303:: .ASCIZ \ MR BIT WENT CLEAR 1/5 TO 5 SECONDS AFTER RESET.\ 


-— 
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-— 


007155 
007252 
007321 
007403 
007471 
007537 
007620 
007713 
010003 
010073 
010127 
010217 
010307 
010401 
010472 
010527 
010617 
010707 
011001 
011072 
011132 
011205 
011236 
011272 
011336 
011423 
011501 
011525 
011544 
011630 
011706 
011742 
011766 
012012 
012051 
012101 
012167 
012242 
012314 
012327 
012342 
012354 
012362 


013461 
013517 


.ASCIZ 
EMO401:: .ASCIZ 
EmM0402:: .ASCIZ 

.ASCIZ 
EMO501:: .ASCIZ 
EmMOS02:: .ASCIZ 

.-ASCIZ 
EMO0S5S25:: .ASCIZ 
EM0526:: .ASCIZ 
EM0601:: .ASCIZ 
EMO602:: .ASCIZ 

- ASCIZ 
EMO0603:: .ASCIZ 

-ASCIZ 
EMO701:: .ASCIZ 
EMO702:: .ASCIZ 

- ASCIZ 
EMO0703 - ASCIZ 

-ASCIZ 
EMO801:: .ASCIZ 
EmMO0802:: .ASCIZ 
€M0901:: .ASCIZ 
EM0902:: .ASCIZ 
EM1001:: .ASCIZ 
—M1002:: .ASCIZ 
EM1003:: .ASCIZ 
EM1101:: .ASCIZ 
EM1201:: .ASCIZ 
EM1202:: .ASCIZ 
EM1203:: .ASCIZ 
EM1i204:: .ASCIZ 
EM1205:: .ASCIZ 
EM1301:: .ASCIZ 
€M1302:: .ASCIZ 
EM1401:: .ASCIZ 
EM1402:: .ASCIZ 
EM1403:: .ASCIZ 
EM1404:: .ASCIZ 
€M1405:: .ASCIZ 
EM1406:: .ASCIZ 
EM1407:: .ASCIZ 
—M1408:: .ASCIZ 
€M1601:: .ASCIZ 
EM1604:: .ASCIZ 
EM1701:: .ASCIZ 
EM1801:: .ASCIZ 
EM1901:: .ASCIZ 
EM2001:: .ASCIZ 
EM2002:: .ASCIZ 
€M2101:: .ASCIZ 
EM2102:: .ASCIZ 
EM2201:: .ASCIZ 
EM2202:: .ASCIZ 
EM2203:: .ASCIZ 
EM230':: .ASCIZ 
EM23¢2:: .ASCIZ 
EM2/01:: .ASCIZ 
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/ SELFTEST DID NOT GET SKIPPED (SHOULD HAVE BEEN SKIPPED)./ 
/RBUF REGISTER RX CHARACTER FIELD TEST / 

/ IMPROPER CODE FOUND IN RX FIFO AFTER DUT RESET./ 

/ EXPECTED: SELFTEST CODE, ACTUAL: IMPROPER CODE./ 
/RBUF REGISTER ERROR FLAGS FIELD TEST / 

/ RX ERROR FLAG(CS) FOUND CLEAR ON SELFTEST CODE./ 

/ EXPECTED: ALL ERROR FLAGS SET, ACTUAL: FLAGCS) CLEAR./ 
4 RX INTERRUPT(S) RECEIVED WITH RX INTERRUPTS DISABLED./ 

/ TX INTERRUPT(S) RECEIVED WITH TX INTERRUPTS DISABLED./ 
/CSR RX.DATA.AVAIL BIT TEST / 

7 RX.DATA.AVAIL BIT FOUND CLEAR AFTER RESET COMPLETION. / 

/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 

4 RX.DATA.AVAIL BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.A BIT CLEARING./ 
/RBUF RX.DATA.VALIO BIT TEST / 

7 RX.DATA.VALID BIT FOUND CLEAR AFTER RESET COMPLETION./ 

/ EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO./ 

7 RX.DATA.VALID BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
/ 600 CHARS READ FROM FIFO WITHOUT R.D.V BIT CLEARING./ 
/RBUF RX.LINE.NUMBER FIELD TEST / 

/ LINE NUMBER IS WRONG ON A SELFTEST CODE./ 

/CHECK FOR BMP_CODES TEST/ 

/UNEXPECTED BMP CODES FOUND./ 

/DIAGNOSTIC FAIL (SKP SELFTEST) TEST/ 

/ SKIP SELF-TEST TOOK TOO LONG TO COMPLETE, > SO MS./ 

/ SKIP SELF-TEST COMPLETED TOO SOON, < 10 MS./ 

/SKIP SELF-TEST TEST/ 

/SELF-TEST TEST/ 

/ SELF-TEST TOOK TOO LONG TO COMPLETE, > 3 SECONDS./ 

\ SELF-TEST COMPLETED TOO SOON, < 1/2 SECOND.\ 

/ SELF-TEST DID NOT EXECUTE/ 

/ OIAG_FAIL BIT BAD/ 

/FAIL SELF-TEST TEST/ 

/ SELF-TEST ERROR REPORTING BAD/ 

/ROM VERSION_NUMBER TEST/ 

/ FIFO EMPTY, ONE OR MORE ROM VERSION_NUMBERS MISSING/ 

/ ROM VERSION_ NUMBER FOUND OUT OF SEQUENCE/ 

4 ONE OR MORE ROM VERSION_NUMBERS MISSING/ 

/ PROC_1/ 

/ PROC_2/ 

/NOT FOUND/ 

/FOUND/ 

/TIMEQUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 
\DEVICE REGISTER WORD READ/WRITE TEST \ 

\DEVICE REGISTER WORD READ/MODIFY/WRITE TEST \ 

\DEVICE REGISTER BYTE READ/WRITE TEST \ 

\DEVICE REGISTER BYTE READ/MODIFY/WRITE TEST \ 

/DEVICE STAT REGISTER ID BIT TEST / 

/ID BIT BAD. EXPECTED: CLEAR, ACTUAL: SET./ 

\NO TX_DATA_VALID/NO TX_ACTION TEST\ 

/_ TX_ACTION FOUND AFTER INVALID DATA WORD WRITTEN TO LINE: / 
\TX_DATA_VALID/TX_ACTION TEST\ 

4 NO TX_ACTION FOUND AFTER VALID PATA WORD TX'D ON LINE: / 


4 INCORRECT LINE NUMBER FOUND WITH TX_ACT AFTER DATA TX'D ON LINE : 


/TX_ENABLE CINACTIVE) BIT TEST/ 
/ TX_ENABLE BIT BAD ON LINE: / 
/TX_ENABLE (ACTIVE) BIT TEST/ 


SEQ 0043 
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1841 013553 EM2601:: .ASCIZ /RECEIVE INTERRUPT TEST / 

1842 013603 EM2602:: .ASCIZ / NO RX INT GENERATED (DATA_VALID SET, RX INTS ENABLED)./ 
1843 015674 EM2603:: .ASCIZ / NO RX INT GENERATED (NO CODES IN FIFO AFTER RESET). / 

1844 013762 EM2604:: .ASCIZ / NO RX INT GENERATED (RX_DATA_AVAIL CLR, RX INTS ENABLED)./ 
1845 014056 EM2605:: .ASCIZ / RX INTERRUPT GENERATED WITH RX_DATA_AVAIL CLEAR./ 

1846 014141 EM2606:: .ASCIZ /TRANSMIT INTERRUPT TEST ERROR:/ 

1847 014200 EM2607:: .ASCIZ / TX_ACTION SET REPEATEDLY AFTER BOARD RESET, NO DATA SENT./ 
1848 014274 €M2608:: .ASCIZ / TX_ACTION STUCK SET AFTER BOARD RESET./ 

1849 014345 EM2609:: .ASCIZ / TX INTERRUPT GENERATED WITH TX_ACTION CLEAR./ 

1850 014424 EM2610:: .ASCIZ / NO TX INTERRUPT WITH TX_ACTION SET AND TX INTS ENABLED./ 
1851 014516 EM2611:: .ASCIZ / TX_ACTION NOT SET AFTER CHARS SENT ON ALL LINES./ 

1852 014601 EM3001:: .ASCIZ /INTERRUPT BR LEVEL TEST / 

1853 014632 €M3002:: .ASCIZ / NO RX_DATA_AVAIL FROM SELFTEST CODES IN FIFO AFTER RESET./ 
1854 014726 EM3003:: .ASCIZ / TX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 

1855 015002 €&M3004:: .ASCIZ / RX INTERRUPT GENERATED AT WRONG BR LEVEL: / 

1856 015056 EM3005:: .ASCIZ / TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT./ 
1857 015150 €M3101:: .ASCIZ /DIAGNOSTIC FIELD (BMP) TEST/ 

1858 015204 €M3102:: .ASCIZ / DIAGNOSTIC FIELD BAD ON LINE: / 

1859 015245 EM9009:: .ASCIZ /EXPECTED OR CORRECT/ 

1860 015271 €M9010:: .ASCIZ /ACTUAL OR MEASURED / 

1861 015315 &M9014:: .ASCIZ /SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:/ 
1862 015411 €M9017:: .ASCII / FIFO WILL NOT PURGE (DATA.VALID STUCK SET),/ 

1863 015466 -ASCIZ / REMAINDER OF TEST SKIPPED. / 

1864 015522 &M9018:: .ASCIZ /NO CODE/ 

1865 015532 &M9019:: .ASCIZ /NON-SELFTEST/ 

1866 015547 €M9020:: .ASCIZ /SELFTEST ERROR CODE/ 

1867 015573 EM9022:: .ASCIZ /DATA CHARACTER/ 

1868 015612 EM9023:: .ASCIZ /MODEM STATUS CODE/ 

1869 015634 &M9024:: .ASCIZ /SELFTEST CODE/ 

1870 015652 &M9026:: .ASCIZ / LPR CONTENTS: / 

1871 015676 EM9301:: .ASCIZ /BMP CODE REPORT/ 

1872 015716 EM9302:: .ASCIZ /BMP CODE FOUND IN TEST / 

1873 015746 &M9303:: .ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST / 

1874 016013 EM9304:: .ASCIZ /UNEXPECTED BMP CODES FOUND DURING THIS PASS/ 

1875 -EVEN 

1876 -LIST BIN 


SEQ 0044 


— 
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SEQ 0045 


1880 ; Lad stabatatatelaialsiaiaialaininininislnininiginininiaininisisinisinininiainisinininniaisiniainuteiciciui TTT 
1881 3 
1882 F FVTSKL2.P1i1 


é 
1884 hh adadatabalahalatatalainlainiaialnilninialainininiaisininininisiisisinisininiieuuii titi t tit tt ttt TR RTE TRL ER RTE n ey 


1888 -SBTTL GLOBAL ERROR REPORT SECTION 


1890 pee 
1891 ; THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

1892 ; USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
tone ; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 
1 t= 


ioe 
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SEQ 0046 
GLOBAL ERROR REPORTING ROUTINE - EROLO1 - 

1896 -SBTTL GLOBAL ERROR REPORTING ROUTINE - EROLOL - 

1897 jPROREEREEEE ODES ESOS EE OEEEEEDEES ODED EE OD ODED ODES ODODE OE OE ES O0000600000040008 

1898 3% This is an error reporting subroutine which prints additional error 

1899 3% information if an error is detected in TEST 1 (Register Address 

1900 3% Access Test). This subroutine reports the type of access (Read or 

1901 3% Write or both) which caused a bus time-out trap (004 trap). 

1902 3% A message indicating that the DHV may be at the wrong Q-bus address 

1903 3% is also printed. 

1904 3* 

1905 3* INPUTS: RS - Error flag word. 

1906 3% If bit 0 is set, a read error occured. 

1907 3% If bit 1 is set, a write error occured. 

1908 3% 

teed ;* OUTPUTS: Messages are printed at the operator console. 

3* 
1911 3*# CALLING SEQUENCE: Include the label “ERO101” as the message pointer 
teak 3% parameter in the DRS error report macro call. 
3% 

1914 3;* COMMENTS: 

1915 3% 

1916 ;* SUBORDINATE ROUTINES USED: None. 

1917 FPRESEEREEEEEE ESOS SEES EEEEESEEEEEEEE ODED ODED DEES OD EEEE ODES OE OE OEE EEEREEEE REEDS 

1918 

1919 016070 BGNMSG €ERO101 
016070 ERO1O1L:: 

1920 016070 SAVE ;SAVE THE GPR CONTENTS. 

sone 016070 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 

1922 016074 032705 000001 BIT *BITO,RS sTEST FOR READ ERROR. 

1923 016100 001410 BEQ 2s s;SKIP READ ERROR MSG IF NO READ ERROR. 

1924 016102 PRINTB #MSG1 ;PRINT READ ERROR MESSAGE. 
016102 012746 016174 : MOV @MSG1,-CSP) 
016106 012746 000001 MOV #1,-(SP) 
016112 010600 MOV SP ,RO 
016114 104414 TRAP C$PNTB 
016116 062706 000004 ADO 04 ,SP 

1925 016122 032705 000002 2$: BIT #BIT1,R5 ;TEST FOR WRITE ERROR. 

1926 016126 001410 BEQ 4$ sSKIP WRITE ERROR MSG IF NO WRITE ERROR. 

1927 016130 PRINTB #MSG2 sPRINT WRITE ERROR MESSAGE. 
016130 012746 016252 MOV @MSG2, -( SP) 
016134 012746 000001 MOV #1,-(SP) 
016140 010600 MOV SP ,RO 
016142 104414 TRAP C$PNTB 
016144 062706 000004 ADD 04 ,SP 

1928 016150 4$: PRINTX #MSG3 ;SUGGEST THAT DHV MAY BE AT WRONG ADDRESS. 
016150 012746 016331 MOV @MSG3, -( SP) 
016154 012746 000001 MOV #1,-CSP) 
016160 010600 MOV SP ,RO 
016162 104415 TRAP CS$PNTX 
016164 062706 000004 ADD 04 ,SP 

1929 016170 PASS sRESTORE THE GPR CONTENTS. 
016170 004736 JSR PC,aCSP)+ ;RETURN TO PREGOS SUBRT. 

1930 016172 ENDMSG 
016172 L10002: 

wees 016172 104423 TRAP C$MSG 


1932 016174 045 101 102 MSGi:: .ASCIZ /#sABUS TIME-OUT TRAP CAUSED BY READ ATTEMPT. sN/ 


— 
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1933 


1934 


1935 
1936 


—— 


016177 
016202 
016205 
016210 
016213 
016216 
016221 
016224 
016227 
016232 
016235 
016240 
016243 
016246 
016251 
016252 
016255 
016260 
016263 
016266 
016271 
016274 
016277 
016302 
016305 
016310 
016313 
016316 
016321 
016324 
016327 
016331 
016334 
016337 
016342 
016345 
016350 
016353 
016356 
016361 
016364 
016367 
016372 
016375 
016400 
016403 


- ERO1O1 - 


MSG2: : 


MSG3:: 





-ASCIZ /#ABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT.sN/ 


-ASCIZ /SADHV MAY BE AT THE WRONG Q-BUS ADDRESS. sNsN/ 


-EVEN 


SEQ 0047 
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SEQ 0048 
GLOBAL ERROR REPORTING ROUTINE - ERO2ZO1 - 
1938 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ERO2ZO1 - 
1939 Error i rT rrr eri i iti P Titi Tiwi tii ttt titi titi ttt tT Tt TT TT TTT TTT TTT TTT TTT TTT TT 
1940 3% This is an error reporting subroutine which prints 2 contiguous 
1941 3% ASCII error messages. The address of the first message is passed 
1942 3% as an input parameter and the address of the second is found by 
poy 3* searching for the end of the first message. 
1944 3* 
pee 3* INPUTS: Ri - Address of the first message to print. 
1946 :* 
ped 3 OUTPUTS: A messages is printed at the operator console. 
;* 
1949 3*# CALLING SEQUENCE: Load the address of the first message in R1. 
1950 3% Include the label “ERO201” as the message pointer 
pe 3% parameter in the Diag Super error report macro call. 
7* 
1953 ;* COMMENTS: The message is printed as Basic error information. 
1954 pe The second message should follow the first one in the program 
io i* memory. Each message should be defined using .ASCIZ 
6 3* 
1957 ;* SUBORDINATE ROUTINES USED: None. 
1958 FRRRRAREAAEEEEAEESEAECERERRAREREEEREREREREAEEEEEEREE ODES EEEEEEEREDEEEEEEREEEERES 
1959 
1960 016406 BGNMSG ERO201 
016406 ERO2O1:: 
1961 016406 SAVE sSAVE THE GPR CONTENTS. 
me 016406 004537 003776 JSR RS ,PRECOS ;CALL REGISTER SAVE SUBRT. 
1 
1963 016412 010102 MOV R1,R2 
1964 016414 105722 2s: TSTB (R2)+ ;CHECK FOR A ZERO BYTE CEND OF MESSAGE). 
foot 016416 001376 BNE 2s ;LOOP UNTIL NEXT MESSAGE IS FOUND. 
1966 
1967 016420 PRINTB #EFOSO03,R1 ;PRINT THE FIRST MESSAGE. 
016420 010146 MOV R1,-CSP) 
016422 012746 004134 MOV #EFOS03, -( SP) 
016426 012746 000002 MOV #2,-(SP) 
016432 010600 MOV SP ,RO 
016434 104414 TRAP C$PNTB 
016436 062706 000006 ADD #6 ,SP 
1968 016442 PRINTB #E€FO503,R2 sPRINT THE SECOND MESSAGE. 
016442 010246 MOV R2,-C(SP) 
016444 012746 004134 MOV EF 0503, -C SP) 
016450 012746 000002 MOV @2,-(SP) 
016454 010600 MOV SP ,RO 
016456 104414 TRAP C$PNTB 
os 016460 062706 000006 ADD #6 ,SP 
1969 
1970 016464 PASS sRESTORE THE GPR CONTENTS. 
- 016464 004736 JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
1 
1972 016466 ENDMSG 
016466 L10003: 


016466 104423 TRAP C$MSG 





— 
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1974 


1992 


1993 
1994 


1995 
1996 


— 


016470 
016470 


016470 
016470 
016472 
016476 
016502 
016504 
016506 


016512 
016512 
016512 


010146 
012746 
012746 
010600 
104414 
062706 


104423 


004134 
000002 


000006 


SEQ 0049 
- EROSOS - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSOS - 
tT dachahachathetachatusheheecatheacatheeeeh hhh iho ttt LL LLL LLL te TTT TT TTT TT TTT TTT TTT Tt Tt 
3* This is an error reporting subroutine which prints an additional error 
3% message whose address is passed as an input parameter. 
3% 
:* INPUTS: Rl - Address of the message to print. 
3* 
3# OUTPUTS: A messages is printed at the operator console. 
3% 
3*# CALLING SEQUENCE: Load the address of the message in R1. 
3% Include the label “EROS03” as the message pointer 
;* parameter in the Diag Super error report macro cell. 
7* 
3* COMMENTS: The message is printed as Basic error information. 
3% 


;* SUBORDINATE ROUTINES USED: None. 
jRRREEEE REESE ES EEEEEEEE EE ESOS EE EE EE EEE OSES OS OS 04 0800000004 0000 000040 0R ER EE EEE 


BGNMSG EROSO3 


PRINTB #€F0503,R1 


ENDMSG 






















EROSO3: : 
sPRINT THE MESSAGE. 

MOV Ri, -(SP) 
MOV €F0503, -( SP) 
MOV @2,-C(SP) 
MOV SP ,RO 
TRAP C$PNTB 
ADD 6 ,SP 

L10004: 


C$MSG 
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SEQ 0050 
GLOBAL ERROR REPORTING ROUTINE - EROSO4 - 
1998 -SBTTL GLOBAL ERROR REPORTING ROUTINE - EROSO4 - 
1999 PTT riri iri rrr iri titi iti iii tit iii i titi titi Titi TTT TT TT TTT TTT TTT TTT TT TTT TTT 
2000 3% This is en error reporting subroutine which prints additional error 
oes 3* messages when illegal interrupts ere received. 
3% 
2003 3 INPUTS: Ri - Address of the message to print. 
eee 3% R2 - Number of illegal interrupts received. 
3% 
ee :# OUTPUTS: Messagess are printed at the operator console. 
3a 
2008 3# CALLING SEQUENCE: Load the eddress of the message in R1. 
2009 3% Load the number of illegel ints in R2. 
2010 3* Include the label “EROS04” as the message pointer 
peas 3% peremeter in the Diag Super error report macro cell. 
3% 
2013 3; COMMENTS: 
2014 3% 
2015 3# SUBORDINATE ROUTINES USED: None. 
2016 jo hb hhh hb hh bs 066006040 0460006446 60000000 000006 000006 00000000 000006000000000000008 
2017 
2018 016514 BGNMSG EROS04 
anee 016514 EROSO4: : 
2020 016514 PRINTB #€FO503,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
016514 010146 MOV R1,-(SP) 
016516 012746 004134 MOV #EFO503, -( SP) 
016522 012746 000002 @2,-(SP) 





016526 010600 
016530 104414 
016532 062706 000006 AOD 
2021 016536 PRINTX #€FO0S0S,R2 sPRINT THE NUMBER OF INTS RECEIVED. 
016536 010246 MOV 
016540 012746 004141 
016544 012746 000002 
016550 010600 
016552 104415 
016554 062706 000006 
2022 
2023 016560 ENOMSG 
016560 
016560 104423 


~— 

















2056 016604 012705 
2057 016610 012701 
2058 016614 012702 
2059 016620 120305 
2060 016622 001402 
2061 016624 012702 
2062 016630 004737 


2064 016634 012701 


016562 010146 
016564 012746 


000143 
012314 
012342 


012354 
016662 
012327 
012342 


012354 
016662 





§ 9066606606066 6666606006 060606 6606666466066 66 0606006 06606660600060600006000660086606068608 


3¢ 


; Determine which Rom version number(s) are missing. 


23: 


43: 


50$: 


- ER1401 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE 
§90006066606666000 0006060606 0600060600606 00600600606060600000060000000000000000000000 
This is en error reporting subroutine which prints edditionel error 
information if an error is detected in the Rom version test. 
This subroutine —_ ~y the input peremeters which contain the 

or PROC_1 end PROC_2 and reports the eppropr i ete 
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ROM version numbers 
error message to the operetor. 


INPUTS: Ri - Contains the eddress of the first message to be reported. 
R3 - Contains the ROM version number of PROC_1. 
R4 _ Contains the ROM version number of PROC_2. 


OUTPUTS: Basic and extended error messages ere reported at the 


operators console. 


CALLING SEQUENCE: Include the lebel “ER1401" as the message pointer 
peremeter in the ORS error report macro cell. 


COMMENTS: 
SUBORDINATE ROUTINES USED: None. 


BGNMSG €ER1401 


PRINTB #€F0503,R1 


MOV #99. ,RS 
MOV @€M1405,R1 


MOV #€M1407,R2 
CMPB =R3.LRS 
BEQ 2s 
MOV @€M1408 ,R2 
JSR PC 508 


MOV @€M1406,R1 
MOV #€M1407,R2 
CHPB = R4,RS 


RE 
MOV @€M1408 ,R2 
JSR PC 508 
60% 


PRINTX #€F1402,R1,R2 





- ER1401 - 










ER1401:: 
sREPORT THE ERROR MESSAGE PASSED IN. 
MOV R 








sGET INVALID ROM NUMBER. 

sSELECT PROC_1 MESSAGE. 

sSELECT THE “NOT FOUND” MESSAGE. 
sCHECK PROC_1 ROM VERSION NUMBER. 
sGO REPORT PROC_1 CODE NOT FOUND. 
sSELECT “FOUND” MESSAGE. 

sGO REPORT MESSAGE. 


sSELECT PROC_2 MESSAGE. 

sSELECT THE “NOT FOUND” MESSAGE. 
sCHECK PROC_2 ROM VERSION NUMBER. 
sGO REPORT PROC_2 CODE NOT FOUND. 
sSELECT “FOUND” MESSAGE. 
=e THE MESSAGE. 

3 ° 


sREPORT THE MESSAGE. 












MOV R2,-(SP) 
R1,-CSP) 
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016666 012746 004316 #€F 1402, -( SP) 
016672 SP) 
016676 
016700 
016702 

2073 016706 

2074 016710 
016710 
016710 


SEQ 0052 





= 
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SEQ 0053 
GLOBAL ERROR REPORTING ROUTINE - ER1601 - 
2076 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1601 - 
2077 FEROSAROAEEEEEEESEEAEDEREEAEESESEREREEEEEDDEEEEE OD EEEEEEEEEEOEOSOEEEEEEEEEEEEDE 
2078 :¢ This an error reporting subroutine which prints additional error 
2079 3¢ information if an error is detected in one of the device register 
2080 34 eccess tests. 
2081 34 This subroutine reports the actual and expected from the device 
tee :¢ register(s) which is(ere) in faulty. 
3% 
2084 3 INPUTS: Ri - Actual date (unuse4 bits set to 0). 
2085 ;e R2 - Expected data (unused bits set to 0). 
2086 34 R3 - Offset (in bytes) to the register being tested. 
2087 34 RS - Line number of register being tested. 
pose 34 RMATBB - Lebel at base of register message address table. 
34 
noe 3@ OUTPUTS: Messages are printed at the operators console. 
1 34% 
2092 3# CALLING SEQUENCE: Include the lable “ER1601” as the message pointer 
2093 34 parameter in the DRS error report macro cell. 
2094 34 
2095 3@ COMMENTS: 
2096 34 
2097 3* SUBORDINATE ROUTINES CALLED: NONE 
2098 FPROAEOOAEEEAEEESEEEEEAEEEEEEAESESSAESESEHESEEEEEEEAAAEEEEEDEE EASED EERE REEEEES 
2099 016712 BGNMSG ER1601 
sees 016712 ER1601:: 
1 
tet 016712 016304 002304 MOV RMATBB(R3),R4  ;FETCH ADDRESS OF REGISTER NAME MESSAGE. 
1 
2103 016716 PRINTB @€F1604,R4,R5  ;REPORT BASIC MESSAGE (REG NAME AND LINE @). 
016716 010546 MOV R5,-CSP) 
016720 010446 MOV R4,-(SP) 
016722 012746 004503 MOV %€F 1604, -( SP) 
016726 012746 000003 MOV #3,-(SP) 
016732 010600 MOV SP,RO 
016734 104414 TRAP CS$PNTB 
016736 062706 000010 ADD #10,SP 
2104 016742 PRINTX #@€F1602,R2 sPRINT THE EXPECTED DATA. 
016742 010246 MOV R2,-(SP) 
016744 012746 004377 MOV EF 1602, -( SP) 
016750 012746 000002 MOV #2,-(SP) 
016754 010600 MOV SP RO 
016756 104415 TRAP CS$PNTX 
016760 062706 000006 ADD 96 ,SP 
2105 016764 PRINTX #@€F1603,R1 sPRINT THE ACTUAL DATA. 
015764 010146 MOV R1,-(SP) 
016766 012746 004441 MOV EF 1603, -( SP) 
016772 012746 000002 MOV @2,-(SP) 
016776 010600 MOV SP ,RO 
017000 104415 TRAP CSPNTX 
017002 062706 000006 ADD 06 ,SP 
2106 017006 ENDMSG 
017006 L10007: 





017006 104423 C$MSG 


—— 
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2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 


2130 


2131 
2132 


2133 
2134 
2135 


2136 
2137 


2138 


-— 


017010 
017010 
017010 
017010 


017014 
017014 
017016 
017022 
017026 
017030 
017032 


017036 
017042 
017042 
017044 
017050 
017054 
017056 
017060 


017064 
017064 
017066 
017066 
017066 





004537 


010146 
012746 
012746 
010600 
104414 
062706 


013702 


010246 
012746 
012746 
010600 
104414 
062706 


004736 


104423 


003776 


004134 
000002 


000006 
003772 


004353 
000002 


000006 






























SEQ 0054 
- ER1603 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 
§ 0002000066000 0060066066666 666460646606064646666666606606606460606066646664640466646666466646446468 
34 This error reporting routine is used to print out a basic error 
3¢ message, along with a message informing the operator which test is 
34 about to be aborted. 
3% 
3@ INPUTS: R1 - Contains the address of the message to be printed. 
ie ERRMSG - Contains the address of the ge that indicates 
34 the test that is being performed, eg DMA, BREAK etc. 
3% 
3@ OUTPUTS: Messages are printed at the operators console. 
34 "“testname TEST ABORTED” 
34 
3@ CALLING SEQUENCE: Include the lable "ER1603” as the message pointer 
34 perameter in the ORS error report macro call. 
7o 
3:@ COMMENTS: 
3* 
3% 


3# SUBORDINATE ROUTINES CALLED: None. 
PoP PPO errr rrr iiiiiiiiiititiiitititiittitititittti ttt TTT TTT 


BGNMSG €ER1603 


ER1603:: 
SAVE ;SAVE THE CONTENTS OF THE GPRS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
PRINTB #€F0503,R1 sPRINT BASIC MESSAGE ON OPERATORS CONSOLE. 
MOV R1,-(SP) 
MOV #€F0503, -( SP) 
MOV #2,-(SP) 
MOV SP ,RO 
TRAP CSPNTB 
ADD 06,SP 
MOV ERRMSG ,R2 ;GET THE “TEST MESSAGE”. 
PRINTB #€F1601,R2 sPRINT “TEST ABORTED” MESSAGE. 
MOV R2,-(SP) 
MOV @EF 1601, -C SP) 
MOV SP RO 
TRAP C$PNTB 
ADD #6 ,SP 
PASS sRESTORE THE CONTENTS OF THE GPRS. 
JSR PC ,.a(SP)-+ sRETURN TO PREGOS SUBRT. 
ENDMSG 
L10010: 


TRAP C$MSG 





2140 
2141 


2163 


2164 


2165 
2166 


-— 


017070 
017070 


017070 
017070 
017072 
017076 
017102 
017104 
017106 
017112 
017112 
017114 
017120 
017124 
017126 
017130 
017134 
017134 
017136 
017142 
017146 
017150 
017152 


017156 
017156 
017156 





004134 
000002 


000006 


004600 
000002 


000006 


004647 
000002 


000006 





pe a 
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SEQ 0055 


- ER3001 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER3001 - 
$908 00000606 0606 00006066066606666064600660646006066066464606646600664464646 64640464646 446446 64646644604 
34 This is en error reporting subroutine which is intended for use in the 
34 Interrupt BR Level Test. It reports additional information when an 
34 interrupt has occurred at the wrong BR level. 
3% 
3 INPUTS: R1 - Address of message to print first. 
3% R4 - BR level at which the int request occurred. 
3% RS - Expected or correct BR level for the DUT. 
3% 
3@ OUTPUTS: A messages is printed at the operator console. 
3% 
3;@ CALLING SEQUENCE: Include the label “ER3001” as the message pointer 
34 parameter in the Diag Super error report macro call. 
3% 
;* COMMENTS: The message is printed as Basic and Extended error information. 
3% 
3# SUBORDINATE ROUTINES USED: None. 
FPSSSSSSAAASASSKSESSEAAEKEKEESARASHESAARESASESASASLAESSEAAAREARARERESERELEAERERERE 
BGNMSG ER3001 
ER3001:: 
PRINTB #@€F0503,R1 sPRINT THE FIRST LINE OF THE MESSAGE. 
MOV R1i,-(SP) 
MOV EF 0503, -( SP) 
MOV #2,-(SP) 
MOV SP,RO 
TRAP CS$PNTB 
ADD #6 ,SP 
PRINTX #€F3001,R5 ;REPORT EXPECTED BR LEVEL. 
MOV RS,-C(SF) 
MOV EF 3001, -C SP) 
MOV #2,-(SP) 
MOV »RO 
TRAP C$PNTX 
ADD #6 ,SP 
PRINTX #€F3002,R4 sREPORT ACTUAL BR LEVEL. 
MOV R4,-CSP) 
MOV ®EF 3002, -( SP) 
MOV #2,-(SP) 
MOV SP ,RO 
TRAP C$PNTX 
ADD #6 ,SP 
ENDMSG 
L10011: 
T C$MSG 
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2168 
2169 
2170 
2171 
2172 
2173 
2174 
2176 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 


2190 
2191 


—— 


017160 
017160 


017160 
017160 
017164 
017170 
017174 
017176 
017200 
017204 
017206 
017212 
017214 
017216 
017220 
017222 
017222 
017226 
017230 
017234 
017240 
017242 
017244 
017250 
017252 
017254 
017256 


017260 
017260 
017260 





015315 
004134 
000002 
000006 


002462 


002464 


005225 
000003 


000010 




























SEQ 0056 
- ER9004 - 
-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9004 - 
$900 0000000606060 66 666664600066 066066066 6026046606466 66 06646060664 4606064064 644660646 464646404646 4646464666 
34 This is an error reporting subroutine which reports error summaries 
3% for lines which have exceeded the specified maximum number of 
3% individual reception errors. 
3% 
3@ INPUTS: Ri - Address of message to print first. 
34 ERCNTB - Label at base of line error counters table. 
34 ERSMRF - “Report error summary for line” flags. 
3% 
3# OUTPUTS: A message is printed at the operator console. 
3% 
3# CALLING SEQUENCE: Include the label “ER9004” as the message pointer 
34 parameter in the Diag Super error report macro call. 
3% 
3# COMMENTS: The message is printed as Besic and Extended error information. 
34 The contents of GPR's R2, R3, R4, and RS are destroyed. 
3% 
3# SUBORDINATE ROUTINES USED: None. 
§ 98804604608 0600004606046 460060046 664640460666 46064606 6460464646 064004654646 0446464 646464046464 4644484644 
BGNMSG ER9004 
ER9004:: 
PRINTB @€FO503,0EM9014 ;REPORT THE SECONDARY ERROR MESSAGE. 
MOV 9€M9014, -( SP) 


MOV #EFOSO3, -( SP) 
MOV @2,-(SP) 


MOV SP ,RO 
TRAP CSPNTB 
ADD 06 ,SP 
CLR R2 sCLEAR THE LINE COUNTER. 
MOV ERSMRF ,R3 ;GET THE ERROR SUMMARY FLAGS. 
CLR R4 sCLEAR “LINE COUNTER TIMES 2” OFFSET. 
2s: CLC sCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 
ROR R3 sSHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRY. 
BCC 4$ sSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 


PRINTX #€F9010,R2,ERCNTBC(R4) 
MOV yet” an ia 


MOV »RO 
TRAP CSPNTX 
AD #10,SP 
4$: MOV (R4)+,R5 sINCREMENT THE LINE OFFSET BY 2. 
INC R2 sINCREMT THE LINE COUNTER. 
TST R3 sCHECK THE ERROR SUMMARY FLAGS. 
BNE 2s sIF MORE FLAGS SET, LOOP TO DO OTHER LINES. 
ENDMSG 
Li0012: 


TRAP C$MSG 
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SEQ 0057 


GLOBAL ERROR REPORTING ROUTINE - ER9007 - 
2206 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9007 - 
2207 FHRRREEEEEEEEEEEEEEEEEEREEEE DEED EDOEOD EE OE OSES 2600 066000000000060600000000400008 
2208 3% This is an error reporting subroutine which is used to report that 
2209 34 something other than a selftest code was found in a selftest code 
2210 3* FIFO slot during the removal of the selftest codes from the FIFO. 
ee 34 This routine is used by the RSTRPT routine. 
1 3% 
2213 3* INPUTS: Ri - Address of error message qualifier string. 
2214 7* R2 - Incorrect code as read from the selftest code FIFO slot. 
os 7% R3 - Line number associated with the selftest FIFO slot. 
1 3* 
poet 3* OUTPUTS: A message is printed at the operator console. 
i 34 
2219 3# CALLING SEQUENCE: Include the label “ER9007” as the message pointer 
— 3* parameter in the Diag Super error report macro call. 
3% 
poe 3* COMMENTS: The message is printed as Basic and Extended error information. 
3* 
2224 :* SUBORDINATE ROUTINES USED: None. 
2225 Hachacnainsiacintintedadiatetntasetntetatatntetedentee heb TTT iT Trt tt 
2226 
2227 017262 BGNMSG €ER9007 
_— 017262 ER9007: : 
22 
2229 017262 042703 177760 BIC #177760,R3 sREMOVE ALL BUT LINE @ BITS FROM LINE @ WORD. 
2230 017266 PRINTB #€F9018,R1,R3  ;REPORT SECONDARY ERROR MESSAGE. 
017266 010346 MOV RZ, -(SP) 
017270 010146 MOV R1,-(SP) 
017272 012746 005475 MOV #€F9018, -( SP) 
017276 012746 000003 MOV #3,-(SP) 
017302 010600 MOV SP ,RO 
017304 104414 TRAP CS$PNTB 
017306 062706 000010 ADD #10, SP 
2231 017312 PRINTX @€F9017,R1,R2 ;REPORT THE ACTUAL INCORRECT CODE. 
017312 010246 MOV R2,-(SP) 
017314 010146 MOV R1,-C(SP) 
017316 012746 005421 MOV %€F9017, -( SP) 
017322 012746 000003 MOV #3,-(SP) 
017326 010600 MOV SP ,RO 
017330 104415 TRAP CS$PNTX 
- 017332 062706 000010 ADD #10,SP 
22 
2233 017336 ENDMSG 
017336 L10013: 


017336 104423 TRAP C$MSG 
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SEQ 0058 
GLOBAL ERROR REPORTING ROUTINE - ER9008 - 
2235 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9008 - 
2236 PPECII Tir iter i iii ti titi titi titi itt ttt iT iT TTT TTT TT TTT TTT TT TTT TT TTT TTT TTT TTT TTT 
2237 3% This is an error reporting subroutine which is used to report that 
2238 3% an unexpected code or character has been found in the DUT receive 
2239 34 cherecter FIFO. 
2240 3% 
2241 3 INPUTS: R1 - Address of pertial error message string. 
os 34 R2 - Incorrect code as read from the selftest code FIFO slot. 
7* 
aes 3* OUTPUTS: A message is printed at the operator console. 
;* 
2246 ;* CALLING SEQUENCE: Include the label “ER9008” as the message pointer 
aed 3% perameter in the Diag Super error report macro call. 
3* 
oes 3* COMMENTS: The message is printed as Basic and Extended error information. 
3* 
2251 ;* SUBORDINATE ROUTINES USED: None. 
2252 SSSSSKEAAKERSKASASLASESASEAASESEAAAEAAAEAERARESEAAAAESEAKRAAKAREALALESELALEALEALEREE 
2253 
2254 017340 BGNMSG ER9008 
017340 ER9008: : 
2255 
2256 3+ 
2257 ; Extract the line number from the incorrect code or character which was read 
pied 3 from the selftest code FIFO slot. 
2260 017340 010203 MOV R2,R3 
2261 017342 000303 SWAB R3 
2262 017344 042703 177760 BIC #177760,R3 sCALCULATE LINE NUMBER OF CODE. 
2263 017350 PRINTB #€F9016,R1,R3 sREPORT TYPE OF INCORRECT CODE FOUND. 
017350 010346 MOV R3,-CSP) 
017352 010146 MOV R1i,-CSP) 
017354 012746 005324 MOV #€F 9016, -( SP) 
017360 012746 000003 MOV #3,-(SP) 
017364 010600 MOV SP ,RO 
017366 104414 TRAP C$PNTB 
017370 062706 000010 ADD #10,SP 
2264 017374 PRINTX #€F9017,R1,R2 sREPORT THE ACTUAL INCORRECT CODE. 
017374 010246 MOV 


017376 010146 
017400 012746 005421 
017404 012746 000003 
017410 010600 
017412 104415 
017414 062706 000010 
2265 
2266 017420 ENDMSG 
017420 
017420 104423 


- 





ee 
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2290 
2291 


-— 


017422 
017422 


017422 
017422 
017424 
017426 
017432 
017436 
017440 
017442 


017446 
017446 
017446 


010146 
010246 
012746 
012746 
010600 
104414 
062706 


104423 


005201 
000003 


000010 





- ER9101 - 


-SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 

PTT reo rrr iti rir i iri titi iti titi titi titi TTT Tt tT TTT TTT TTT TTT TT TTT TTT 
3% This is a general error reporting subroutine which reports a message 

3% which takes a single, 2 digit decimal argument after the end of an 

3% ASCII message. 


3* 
3;* INPUTS: Ri - Value to be printed after neg as 2 decimal digits. 
3% R2 - Address of message to print first. 


3* 
3* OUTPUTS: A messages is printed at the operator console. 


3* 
3* CALLING SEQUENCE: Include the label "ER9101” as the message pointer 
34 parameter in the Diag Super error report macro call. 


3* 
3* COMMENTS: The message is printed as Basic error information. 
3% 


:* SUBORDINATE ROUTINES USED: None. 
SPRREARARAEEAAAEEEEEE SEES EERE SESEEREREREE EAE EE ESOS ESE ES OE EE OE EE EREEEEEEEREEE 


BGNMSG ER9101 
ER9101:: 


PRINTB #€F9006,R2,R1 ;REPORT THE STRING FOLLOWED BY by NUMBER. 
V 


ADD #10, SP 


ENDMSG 
L10015: 





C$mMSG 





SEQ 0059 
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SEQ 0060 
GLOBAL ERROR REPORTING ROUTINE - ER9301 - 
2293 -SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9301 - 
2294 hh aaetaataeeadeeeneeeee nh ot ett Litt titi titi titi tite TTT TTT TTT TT TTT TTT TTT Tet 
2295 34 Tais is ean error reporting subroutine which prints any BMP codes 
2296 3* that ere found in the BMP code queue, together with the the number of 
oad 3% the test that was executing at the time the BMP code was logged. 
3% 
2299 3* INPUTS: Ri - The address of the first message to be reported. 
caen 3* R2 - The address of the next empty cell in the queue. 
3* 
2302 3;* OUTPUTS: The test number followed by the BMP code are printed at the 
2303 3* operator console. 
2304 3% 
2305 3* CALLING SEQUENCE: Include the label "ER9301” as the message pointer 
coe 3% parameter in the Diag Super error report macro call. 
3% 
tee 3;* COMMENTS: The message is printed as Basic error information. 
3;* 
2310 3* SUBORDINATE ROUTINES USED: None. 
2311 jPRERREEREREEE REDS EE EE EEEE DEES EEEE EOE EE OE OSES EEO EE OO OEE EE EEEEEEEEEEEEEE EDS 
2312 
2313 017450 BGNMSG ER9301 
017450 ER9301:: 
2314 017450 SAVE sSAVE THE GPRS ON THE STACK. 
a 017450 004537 003776 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
2316 017454 PRINTB #EFO503,R1 sREPORT UNEXPECTED BMP CODES FOUND. 
017454 010146 MOV R1,-(SP) 
017456 012746 004134 MOV #EF 0503, -( SP) 
017462 012746 000002 MOV @2,-(SP) 
017466 010600 MOV SP ,RO 
017470 104414 TRAP C$PNTB 
017472 062706 000006 ADD %6,SP 
2317 017476 012703 002526 MOV @BMPCQB,R3 sGET THE START ADDRESS OF THE BMP CODE QUEUE. 
2318 017502 012705 015716 MOV 9EM9302,R5 sGET THE MESSAGE TO BE REPORTED. 
2319 017506 012301 23: MOV (R3)+,R1 sGET THE NUMBER OF THE TEST THAT WAS EXECUTING. 
2320 017510 012304 MOV (R3)+,R4 sGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 
2321 017512 004737 017574 JSR PC ,50$ :GO REPORT THE BMP CODE. 
2322 017516 020302 CMP R3,R2 sCHECK IF ALL CODES HAVE BEEN REPORTED. 
ay 017520 103772 BLO 23 sIF IT IS NOT THE LAST BMP CODE THEN LOOP. 
3¢ 
2325 3; Check if overflow has occurred. 
2326 ; The conditions for overflow are: the pointer contains the address of the 
2327 ; last cell in the queue, and a bmp code has already been written into that 
oa ; cell. 
+H — 
2330 017522 020227 002722 CMP R2, #@BMPCQE -4 sCHECK IF THE POINTER IS AT THE LAST LOCATION. 
2331 017526 001036 BNE 60$ sEXIT IF NOT AT THE LAST LOCATION. 
2332 017530 005762 000002 TST 2(R2) sCHECK FOR A BMP CODE IN THE LAST CELL 
2333 017534 001433 BEQ 60$ sEXIT IF NO OVERFLOW HAS OCCURED, CELL EMPTY. 
2334 017536 012301 MOV CR3)+,R1 sGET THE TEST NUMBER OFF THE QUEUE. 
2335 017540 011304 MOV CR3),R4 sGET THE BMP CODE OFF THE QUEUE. 
2336 017542 012705 015746 MOV #EM93035,R5 sSELECT THE MESSAGE TO BE REPORTED. 
2337 017546 PRINTX #E€F9302 sREPORT OVERFLOW CONDITION. 
017546 012746 005704 MOV GEF 93%, -( SP.) 
017552 012746 000001 MOV a1.-¢.)  - 
017556 010600 MOV SP .RO 


017560 104415 C$PNTX 





on 
















er ee te a 
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SEQ 0061 
GLOBAL ERROR REPORTING ROUTINE - ER9301 - 

017562 062706 000004 ADD 4,SP 

2338 017566 004737 017574 JSR PC ,50$ sREPORT THE LAST BMP CODE PLACED ON THE QUEUE. 

cose 017572 000414 BR 60$ sEXIT. 

2341 017574 50$: PRINTX #€F9301,R5,R1,R4 ;PRINT THE MESSAGE. 
017574 010446 MOV R4,-(SP) 
017576 010146 MOV R1,-(SP) 
017600 010546 MOV RS,-(SP) 
017602 012746 005626 MOV @€F 9301, -( SP) 
017606 012746 000004 MOV 4,-(SP) 
017612 010600 MOV SP ,RO 
017614 104415 TRAP C$PNTX 
017616 062706 000012 ADD #12,SP 

2342 017622 000207 RTS PC sRETURN. 

2343 017624 60$: PASS sRESTORE THE GPR CONTENTS. 

ones 017624 004736 JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 

2345 017626 ENDMSG 
017626 L10016: 
017626 104423 TRAP C$MSG 








— 
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GLOBAL SUBROUTINES SECTION 


pa 





SEQ 0062 


-SBTTL GLOBAL SUBROUTINES SECTION 
Th alahaiatalalaiatalnlaiaininininitnninisaininininininiinininiinnii iii iti titi tt tit ttt ttt TTR TT TLE MT ty 
‘ 


; FVTSKL3.P11 
é 
Hh halalalalalabataalalaialniniaalainininlininininisitsininininisisiiseinaeiiii nit ti ttt ttt tT TTR TTT TRE Teeny 


A 


; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
; THAT ARE USED IN MORE THAN ONE TEST. 
— 
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SEQ 0063 
GLOBAL SUBROUTINE - ALTFLD - 

2362 -SBTTL GLOBAL SUBROUTINE - ALTFLD - 
2363 PeeMe iri ti titi iii tit tt i iit iit iii tt iT TT TTT TTT TTT TT TTT TTT TTT Ti TTT TT TTT TTT 
2364 3% - Alter Device Register Fields Routine - 
2365 3% This subroutine alters the specified field of the specified device 
2366 3% register for the specified lines. This routine can be used to set 
2367 78 or clear bits within selected fields of selected registers. 
2368 3% Use examples: Set RX.BAUD.RATE fields on lines 3 and 6. 
2369 3* Clear TX.DMA bits on all lines. 
2370 3* 
2371 ;* INPUTS: Ri - Address of the registers to alter. 
2372 3% R2 - Bit fields set to desired states. 
2373 3* R3 - Bit map of lines for which to alter register. 
2374 3% R4 - Mask of bits to alter (1 indicates change bit). 
2375 3* CSRA - Contains the address of the device CSR. 
oa 3% IESTAT - Saved states of the interrupt enable bits. 

fe 
2378 :@ OUTPUTS: DEVICE REGISTERS - Specified register fields altered. 
aor? 22 CSR IND.ADR.REG field - Destroyed. 

3% 
tae 3# CALLING SEQUENCE: JSR PC,ALTFLD 
2382 3% 
2383 3* COMMENTS: This routine reads the specified registers for all lines 
2384 3* with numbers lower than the highes specified line. 
i 34 This routine does not read the CSR. 

3* 
2387 ;# SUBROUTINES CALLED: None. 
2388 G7 > $860646464666666 06606064646 6660606466 06064040066 00046046 6600066046446 46404666460464046406060460406408 
2389 
2390 017630 ALTFLO:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
ome 017630 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2392 i¢ 
2393 ; Set up to loop for each line: 
2394 : Prepare the word to be ORed into the register contents. 
coos 3 Set up the word to write into the IND.ADR.REG field of the CSR. 

— 
2397 017634 010400 MOV R4,RO sCALCULATE THE NEW CONTENTS OF THE 
2398 017636 005100 COM RO ; REGISTER FIELDS WHICH ARE TO BE 
2399 017640 040002 BIC RO,R2 ; ALTERRED BY THIS ROUTINE. 
pose 017642 013705 002330 MOV IESTAT,RS sSET UP TO WRITE IND.ADR.REG FIELD TO O. 

3¢ 
2402 ; Loop once for each line, altering the specified field in the specified 
2403 ; register if the line has been selected for altering. 
2404 ; Exit the loop if no more lines to alter, or if we have altered the max 
oor : allowable number of lines (as specified by NUMLNS). 

bn 
2407 017646 000241 CLC sPREPARE FOR ROTATE, “TST RS” DOES THIS BELOW. 
2408 017650 006003 2s: ROR R3 sGET THE LINE SELECT BIT FOR THIS LINE. 
2409 017652 103006 BCC 4s sSKIP SETUP IF LINE IS NOT SELECTED. 
2410 017654 010577 162364 MOV RS ,@CSRA sSET DUT CSR IND.AOR.REG FIELD TO THIS LINE. 
2411 017660 011100 MOV CR1),RO sGET THE PRESENT CONTENTS OF THE REG TO ALTER. 
2412 017662 040400 BIC R4,RO sCLEAR THE BIT FIELDS WE ARE TO ALTER. 
2413 017664 050200 BIS R2,RO ;OR IN THE NEW STATES OF THE FIELDS. 
2414 017666 010011 MOV RO,CR1L) sWRITE THE NEW REGISTER CONTENTS TO THE REG. 
2415 017670 005205 4$: INC RS ;SET LINE NUMBER TO THE NEXT LINE. 
2416 017672 005703 TST R3 sCHECK FOR UNHANDLED LINES, CLEAR CARRY FLAG. 
2417 017674 001365 BNE 2s ;LCOP IF SELECTED LINECS) IS NOT HANDLED. 








‘eu 
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GLOBAL SUBROUTINE 


2418 
2419 017676 

017676 004736 
2420 017700 000207 


- ALTFLD - 


60$: 


JSR 


sRESTORE GPRS. 
PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
sRETURN TO CALLING ROUTNE. 
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GLOBAL SUBROUTINE 


-SBTTL GLOBAL SUBROUTINE 


* 
CALLING SEQUENCE: 
x 


$ Oo ChO0600606 0006060006 6006060600 0006 0006000006 0000000000000000000000000800008 
- Celibrate Milli Second Loop count subroutine - 

This subroutine calibrates the timing loop which is used in the MSLOOP 

This subroutine calculates ea value for the MSLCNT veriable 

which is the number of softwere loops which tekes 1 as to execute in 

This routine celibrates the count by using the 

if no LTC is eveileble the default velue for 


the MSLOOP routine. 
Line Time Clock (LTC), s0 
the delay count aust be 


pe 
3@ SUBORDINATE ROUTINES CALLED: UNSDIV,OOPS. 
Po - 606060606606 6666 06 000000666 60066068 086868060606 0000666 08666666606 8060668664646688 


"synchronize with the LTC. 





Default 1 me delay loop count value, or 

velue from previous celibretion. 

Number of MS per LTC clock tick. 

Timer counter chenged by LTC interrupt service rtn. 
Number of LTC clicks per second (50 or 60). 


CARRY - Set if LTC is eveileble, and new calibration performed. 
MSLCNT - New 1 me delay loop count value if LTC eveileble, or 
unchanged if no LTC is eveileble. 


sSAVE CONTENTS OF GPRS RO THRU RS. 
PREGOS sCALL REGISTER SAVE SUBRT. 
sCLEAR THE 2ND TIME FLAG. 


sSET OUTER LOOP COUNTER TO 1 LOOP. 

siNCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <ee 
sFOLLOWING LOOP FAILS ON FUTURE, 
sCLEAR THE WAIT FOR CLOCK INT COUNTER. 
sSET UP COUNT OF 1 TO SYNCH WITH LTC. 
sCHECK FOR COUNTER HAVING GONE TO ZERO. 
sJUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 
sCOUNT THIS ITERATION OF THE INNER LOOP. 

IF COUNTER HAS NOT TURNED a. 


sLOOP IF OUTER LOOP COUNT NOT UP. 


: "ie we got no LTC interrupt, indicete thet there is no LTC evei leble. 
; LTC auet be flekey. or not really en LTC et ell. 


sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC 
VINDICATE FAILURE FOR RETURN. 
sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


ized with the LTC. 
the celibretioen leop. 


OTIMER1 RG 


FASTER PROCESSORS. 


sWILL TEST TIMER] IN THE LOOP BELOW. 
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GLOBAL SUBROUTINE 


2478 017760 
2479 017762 
2480 017764 
2481 017766 


2483 017772 
2484 017776 


2523 020112 
2524 020114 


2526 020116 
020116 
2527 020120 


2529 020122 
2530 020124 


-— 


005003 


005401 
013702 
010203 
160502 
010204 
005005 
005301 
100403 
060304 
005505 
000773 


013701 
010403 
010502 
004737 
103402 
004737 
010137 
005137 
001277 
000261 


004736 
000207 


000000 
000000 


000001 
002376 
020124 


020470 


002376 


002374 


023036 


020470 
002376 
020122 





- CALMSL - 
CLR Ri 
CLR R2 
CLR 


R3 
MOV 1,(R4) 


83; MOV MSLCNT RS 
10$: MOV (R4),RO 


BIC R2,RO 
CMP RO,R3S 
SEC 

BEQ l2$ 
DEC RS 
BNE 10$ 
DEC R1 
BNE 8$ 


sCLEAR THE OUTER LOOP COUNTER. 
sINDICATE TO CHECK ALL BITS OF TIMER1. 
sINDICATE TO CHECK FOR TIMER1 CLEAR. 
sLOAD TIMER1 WITH COUNT OF 1. 


sLOAD MS LOOP COUNT. 

sGET THE TIMER1 VALUE. 

sSAVE WORD (LIKE IN THE REAL LOOP). 
sLEAVE ALL THE BITS. 

sCOMPARE AGAINST ZERO. 

sSET CARRY IN CASE OF SUCCESS. 

sEXIT LOOP IF TIMER1 HAS CLEARED. 
sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
sLOOP IF MS NOT UP. 

sDECREMENT THE MS TIME COUNT. 

sKEEP LOOPING. 

sWE OVERFLOWED, SOMETHING IS WRONG, ABORT. 


; We have now have loop count information for one clock tick. 

3; We have negative of number of outer loops in R1, each is MSLCNT inner loops. 
; We have the portion of the last outer loop not executed, in R5. 

; Now we calculate the total number of inner loops executed. 


ae 
12$: NEG R1 
MOV MSLCNT ,R2 


MOV R2,R3 
SUB RS.R2 
MOV R2,R4 
CLR RS 
14%; DEC Ri 
BMI 16% 
ADD R3,R4 
ADC RS 
BR 14$ 


3¢ 


sGET NUMBER OF OUTER LOOPS. 

sGET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 
sCOPY NUMBER OF LOOPS FOR MULTIPLY. 

sCALC @ OF INNER LOOPS DONE IN LAST OUTER LOOP 
s_ AND ADD TO ACCUMULATOR LSWORD. 

sCLEAR ACCUMULATOR MSWORD. 

sCHECK R1 FOR O CONDITION 

; SKIP MULTIPLICATION IF ZERO 

sMULTIPLY NUMBER OF INNER 

; LOOPS PER OUTER LOOP BY 

sNUMBER OF OUTER LOOPS PERFORMED. 


; Divide the total number of inner loops by the number of MS per LTC tick. 


16$: MOV =‘ MSTICK,R1 


MOV R4 RZ 
MOV RS ,R2 

JSR PC ,UNSDIV 
BCS 18$ 


JSR PC OOPS 
18$: MOV R1,MSLCNT 
62$ 


com 
BNE 2s 
SEC 
60$: PASS 
JSR 
RTS PC 
62$ -WORD O 
643 -WORD O 


;@ OF MS PER LTC TICK IS DIVISOR. 

sLSWORD OF LOOP COUNT IS LSWORD OF DIVIDEND. 
sMSWORD OF LOOP COUNT IS MSWORD OF DIVIDEND. 
sDIVIDE NUMBER OF LOOPS BY MS PER LTC TICK. 
sBYPASS OOPS IF WE'RE OK. 

sCLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 
sSET NEW VALUE FOR MS LOOP COUNT. 

sSET THE 2ND ITERATION FLAGS IF 1ST ITERATION. 
sBRANCH IF ONLY ONE ITERATION DONE. 

sSET THE SUCCESS FLAG FOR EXIT. 


sRESTORE GPRS, 


PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 


; CARRY - SUCCESS FLAG. SET IF SUCCESS. 


s2ND CALIBRATION ITERATION FLAGS. 
sDUMMY WORD FOR STORAGE OF THE READ WORD. 






SEQ 0066 
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GLOBAL SUBROUTINE 


2555 020126 

020126 
2556 020132 
2557 020136 
2558 020140 
2559 020144 
2560 020146 
2561 020150 
2562 020152 

020152 
2563 020154 


—— 


004537 
005037 
011011 
005737 
000261 
001401 
000241 


004736 
000207 


003776 
002346 


002346 
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- CKTRAP - 
-SBTTL GLOBAL SUBSOUTINE - CKTRAP - 
FPSHHHEHKSK SESH SESHSEKEKEHARESAAHASESL*ESASEEEEAEESEKEKRESERESEAEREEESEEEEEEEEOEERE 
34 Check Trap Routine - 
34 This subroutine is used to check for a bus time-out trap (004 trap) 
3* which is caused by an access to a non-existent memory or I/0 location. 
3¢ If the trap does not occur, this routine returns a success indication. 
3* 
3* INPUTS: RO - Source address for move. 
3* Ri - Destination address for move. 
34 (RO) - Source for the move. 
3¢@ 
3 OUTPUTS: (R1) - Written to the contents of (RO). 
34 Carry fleg - Set on return if no 004 trap detected. 
34 TP4FLG - Nonzero if trap occurred, cleared otherwise. 


3# CALLING SEQUENCE: JSR PC ,CKTRAP 


3% 
3;@ COMMENTS: 


If this subroutine causes a trap, either the address which 
is lebeled ADRPTR will be the trap PC address on the stack. 


3@ SUBORDINATE ROUTINES CALLED: None. 


FPSSAASSAASKESHSAEHSEAKESEESEEAKESEEASKESKASE HAASE SAEEEEKREKEKAEEEEEEKEEEEEEEEEEEEE 


CKTRAP:: SAVE 


ADRPTR:: TST 


60$: PASS 


s;SAVE CONTENTS OF GPRS RO THRU RS. 


JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
TP4FLG s;CLEAR THE 004 TRAP FLAGS. 
(RO), CRI) sPERFORM THE MOVE IN QUESTION. 
TP4FLG sCHECK FOR OCCURENCE OF TRAP. 
sINDICATE SUCCESS. 
60$ sEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 


sINDICATE FAILURE. 
sRESTORE GPRS. 
" JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
















SEQ 0067 








CVDHADO DHV11-M FUNC TST PART 1 MACRO Y0S.02 Wednesday 08-May-85 10:14 Page 57 





SEQ 0068 
GLOBAL SUBROUTINE - CLNRST - 
2565 -SBTTL GLOBAL SUBROUTINE - CLNRST - 
2566 FPORARORASEEEAEEAEEEEE EEE EAEEEEDAEEDE DEED OD ODOEEDEEEEEEOEEEEEEDEEEEEEEEEESEEES 
2567 34 - Clean Reset of the Device Under Test - 
2568 34 This subroutine is used to reset the DUT to a known state. 
2569 i The DUT's self-test is skipped.,and the fifo is purged of any error 
2570 34 codes, etc. 
2571 34 If the reset does not succesfully complete, then the carry bit is 
cee 3% passed back to the calling routine (clear). 
34 
2574 3@ INPUTS: CSRA - Contains the address of the CSR 
2575 34 TXBFCA - Contains address of DUT DMA Buffer Count register. 
2576 34 ERRNBR - Error number for possible error report. 
1s 34 ERRTBL- ERRTYP,ERNBR,and ERRMSG set up correctly. 
3% 
2579 3@ OUTPUTS: The DUT performs its reset function into a known state. 
2580 34 CARRY - Clear indicates the test is to be aborted. 
2581 34 ERRBLK - value may be destroyed. 
2582 34 IESTAT - TX and RX interrupt flags are cleared. 
or 34 TX and RX interrupt enable bits in the DUT’s CSR are cleared. 
4 3% 
caee 3# CALLING SEQUENCE: JSR PC ,CLNRST 
7% 
2587 3 COMMENTS: This subroutine can report errors with numbers ERRNBR. 
tees 34 This routine does not destroy the value of ERRNBR. 
3% 
2590 3* SUBORDINATE ROUTINES CALLED: DELAY,MSLGET,PUFIFO,RESETT. 
2591 Fa acachececatnetete eet LLL LILI LI Li titi tite TTT TT TTT TTT TT TTT TTT Te tt 
2592 
2593 020156 CLNRST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
. 020156 004537 003776 JSR R5 ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2594 7° 
2595 ; Reset the DUT. 
se ; This routine reports errors with numbers from ERRNBR thru ERRNBR+2. 
3 = 
2598 020162 004737 021456 JSR PC ,RESETT sRESET THE DUT TO A KNOWN STATE. 
2599 020166 103002 BCC 60$ sEXIT ROUTINE WITH ABORT TEST INDICATOR. 
2600 36 
vee ; Purge the FIFO of error codes, save any BMP codes found. 
2602 3: 
2603 020170 004737 020716 JSR PC ,PUFIFO s;PURGE THE FIFO. 
2604 
2605 020174 60$: sEXIT THE TEST USING RESETT OR PUFIFO STATUS. 
2606 020174 PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 
020174 004736 JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
2607 sCARRY BIT:IF CLEAR, THEN ABORT THE TEST. 
2608 020176 000207 RTS PC 





— 
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GLOBAL SUBROUTINE 


2610 
2611 
2612 
2613 
2614 


—— 


020200 
020200 
020204 
020210 
020212 
020214 
020216 
020216 
020220 


004537 003776 
012701 000020 












SEQ 0069 












- CLRI6W - 
-SBTTL GLOBAL SUBROUTINE - CLR16W - 
fo SHRAERERERAEARERAAEAERAEEAEAEADASAEAAAEAEEEEAREEEEASEEEREREREE EE EREEEEEEDES 
34 - Clear Sixteen Words Routine - 
3% This subroutine clears 16 words starting with the specified word. 
3* 
3* INPUTS: RO - Address of the first word to clear. 
3* 
3* OUTPUTS: (RO) to (RO+15) - 16 words of memory are cleared to 0. 
3% 
3* CALLING SEQUENCE: JSR PC, ,CLR1i6W 
3% 
3@ COMMENTS: 


3% 
3# SUBORDINATE ROUTINES CALLED: None. 
Fr — SESKKKAKAKESAAEEEAEESEERASERERAREARARESAAAAARAARAAERAEAEAEEAREAEERERAREREEEEE 


CLRI6W:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV #16. ,R1 sSET THE LOOP COUNTER TO 16. 
23: CLR (RO)+ s;CLEAR A WORD OF MEMORY. 
DEC R1 sCOUNT THIS LOOP. 
BNE 2s s;LOOP IF NOT 16 WORD CLEARED. 
60$: PASS sRESTORE GPRS. 
ore - JSR PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 
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2657 020222 
020222 


2661 020226 
2662 020230 
2663 020234 
2664 020236 
2665 020240 
2666 020244 
2667 020250 
2668 020252 
2669 020256 
2670 020260 
2671 020262 
2672 020264 
2673 020272 
2674 020274 

020274 
2675 020276 


—— 





- CNTERR - 
-SBTTL GLOBAL SUBROUTINE - CNTERR - 
Bh Mlachathatataeteeteecateaet hh ELL LLL LLL Titi TTT Titi TTT TTT TTT TT ttt 
3% - Count Error Routine - 
78 This subroutine is used to count a “date” error on the specified 
:* line. It checks whether error summary reporti is active, or should 
3% be made active on this line, and activates it i necessary. 
3% 
3* INPUTS: RS - Line numoer of line under consideration. 
3% ERCNTB - Label at base of error counters table. 
34 ERSMRF - Error summary flags (bit set if line in summary mode). 
3% NDERPT - Number of individual date errors to report on a line. 
3% 
3* OUTPUTS: CARRY - Set if line is in error summary mode. 
3% ERCNT - Error counter incremented for specified line. 
34 ERSMRF - Bit set if line should be in summary mode. 


003776 


002464 
002464 
002230 
002230 


002410 002462 


3* 
3# CALLING SEQUENCE: JSR PC,CNTERR 


7% 

3# COMMENTS: 

7* 

3# SUBORDINATE ROUTINES CALLED: None. 

i-- SEREEREREREREEEEEEAE SEARS RESAARAREASAEAERES ES SEES ES EEOEEEEEEEEREEREEEEEDS 


CNTERR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;sCALL REGISTER SAVE SUBRT. 


3¢ 
; Court the error on the counter for the specified line. 
g* 


ASL RS sFORM WORD OFFSET FROM LINE NUMBER. 
MOV ERCNTB(RS),R1 ;GET THE PRESENT ERROR COUNT FOR THIS LINE. 
INC Ri sCOUNT ERROR. 
BCS 2s sOVERFLOW? YES, DON'T UPDATE COUNTER IN TABLE. 
MOV R1,ERCNTBCRS)  ;UPDATE ERROR COUNTER TABLE ENTRY. 
2s: TST NDERPT 
BEQ 60% sSUMMARYS DISABLED? YES, EXIT WITH CARRY 0. 
CMP R1,NDERPT sNO, CHECK FOR ENOUGH ERRORS FOR SUMMARY USE. 
BHI 4$ sENOUGH ERRORS TO USE SUMMARY? YES, GO HANDLE. 
cLC sINDICATE NOT TO USE SUMMARY REPORT YET. 
BR 60$ sEXIT WITH CARRY 0. 
4$: BIS BITTBLCRS) ,ERSMRF sSET THE ERROR SUMMARY FLAG FOR LINE. 
SEC sINDICATE TO USE SUMMARY REPORT. 
60$: PASS sRESTORE GPRS. 
. . JSR PC, @(SP)-+ sRETURN TO PREGOS SUBRT. 
TS P 





SEQ 0070 
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2695 020300 

020300 
2696 020304 
2697 020306 
2698 020312 
2699 020314 
2700 020320 
2701 020324 
2702 020326 
2703 020332 

020332 
2704 020334 


2706 020336 


pre 


004537 
010401 
012702 
005003 
012704 
004737 
103002 
004737 


004736 
000207 


177777 


003776 
177777 


020336 
020454 


020470 


- DELAY - 


-SBTTL GLOBAL SUBROUTINE 
jPRREEERASEEAEAERE SEAS ER EREREAEEEAREEEEEEREEEEEAEREEEEADEEEREAEEEEEEEAEEEEEEEEE 


Wednesday 08-May-85 10:14 Page 60 


- DELAY - 


3% - DELAY SUBROUTINE - 

3% This subroutine is used to delay a variable number of milli-seconds. 
3% 

;# INPUTS R4 - Contains the number of ms to delay. 

i* MSLCNT. 


3* 
3* OUTPUTS: 


None. 


3% 
3# CALLING SEQUENCE: JSR 
* 


’ 
3* COMMENTS: 
;* 


DELAY:: SAVE 


60$: PASS 


62$: . WORD 


PC ,DELAY 


If no hardware clock interrupts are occuring, control-Cs will 
not be honored for the duration of the delay. 


3* 
;* SUBORDINATE ROUTINES CALLED: None. 
FRRRREEEEEESAEEEEAEAEEEREEESAEREAEASAAEEEAAAEEEREAEAARAREAEEEREERARREEEEREAREEES 


JSR 


#62$ ,R4 
PC ,MSLOOP 
60$ 


PC OOPS 


JSR 
PC 


<1 





sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
sPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 
sTELL MSLOOP ROUTINE TO CHECK ALL BITS. 

sTELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 
sTELL MSLOOP TO CHECK DUMMY NON-ZERO WORD. 
sDELAY THE REQUESTED @ OF MS. 

sEXIT ROUTINE IF WE TIMED-OUT.) 

;IF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 
sRESTORE GPRS. 

PC, @(SP)+ sRETURN TO PREGOS SUBRT. 


sDUMMY, NON-ZERO WORD. 





SEQ 0071 
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SEQ 0072 
GLOBAL SUBROUTINE - MSLGET - 
2708 -SBTTL GLOBAL SUBROUTINE - MSLGET - 
2709 EPPO ri rir rr iret iit iti ti tit iti ti ttt titi tt tit tt TT TT TTT TTT TTT TTT TTT TT TT TTT 
2710 3* - Milli Seconds Loop which returns read word and remaining time - 
2711 3% This subroutine is a general purpose test loop subroutine. It is used 
2712 3% to verify that ea certain action occurs before a time-out period. The 
2713 3% calling routine passes in which bits should be set and cleared for the 
2714 3% desired condition and the time-out value in milli-seconds. 
2715 34 This routine checks for the desired condition upon entrance into the 
2716 3* routine and then once each milli-second there after. 
2717 3% Upon return, the last word which was read to check for the condition 
2718 3* is returned by this subroutine. 
2719 3* 
2720 :* INPUTS: Ri - Time-out value in milli-seconds (up to 64K ms). 
2721 ;* R2 - Bit map of bits to test (1 indicates to test the bit). 
2722 3* R3 - Desired states of the indicated fields in R2. 
2723 3* R4 - Addrese of the word to test. 
din 3% MSLCNT - Milli second software loop count. 
2 3* 
2726 3* OUTPUTS: RO - The last word which was read to check for the condition. 
2727 3* Ri - Remaining number of ms in time-out time. 
hi 3% CARRY - Success flag (set if condition is met before time-out). 
3* 
erat 3* CALLING SEQUENCE: JSR PC ,MSLGET 
1 3* 
2732 3* COMMENTS: This routine works with or without a hardware clock, but the 
2733 3* calibration is only guarenteed when a line clock is available 
2734 3* on the system. 
2735 3% This routine can be used as a delay routine, by specifying the 
2736 74 desired delay as the time-out and specifying a condition to 
2737 ;* look for which will not be met during the delay. 
2738 7* If a time-out value of 0 is specified, this routine checks for 
2739 7* the desired condition before returning. It indicates success 
2740 3* if the condition is met, failure otherwise. 
2741 3% 
2742 3* 
2743 3* SUBORDINATE ROUTINES CALLED: None. 
2744 FESS KESEAKEEEEASAAEAEAEAEASLEESELEREREEEEESEEEEEEEEEEEEEEKEEEEEEREEEEEEEEEEEERERSE 
2745 
2746 020340 MSLGET:: SAVE s;SAVE CONTENTS OF GPRS RO THRU RS. 
020340 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
2747 3¢ 
2748 ; Set up mask for removing unused bits in the test word, and clear unused 
2749 ; bits in the desired state word to allow direct comparison. 
2750 s 
2751 020344 005102 COM R2 ;GET MASK OF UNUSED BITS. 
coe 020346 040203 BIC R2,R3 sMASK OUT UNUSED BITS IN DESIRED STATE WORD. 
3* 
cece ; Handle the test and exit if we have a 0 time-out value. 
2755 $- 
2756 020350 005701 TST Ri ;TEST THE TIME-OUT VALUE FOR ZERO. 
2757 020352 001011 BNE 2s ;IF NON-ZERO TIME-OUT, GO LOOP AND TEST. 
2758 020354 011400 MOV C(R4),RO ;GET THE WORD TO TEST BEFORE EXITING. 
2759 020356 010037 020452 MOV RO ,62$ ;SAVE VALUE SO WE CAN RETURN IT. 
2760 020362 040200 BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 
2761 020364 020003 CMP RO,R3 s;COMPARE AGAINST DESIRED STATE WORD. 
2762 020366 000261 SEC sINDICATE SUCCESS IN CASE WORDS ARE EQUAL. 
2763 020370 001420 BEQ 6$ ;EXIT WITH SUCCESS IF WORDS ARE EQUAL. 





—— 
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— 


2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 
2779 
2780 
2781 
2782 
2783 
2784 
2785 
2786 


2787 
2788 
2789 
2790 
2791 
2792 
2793 


020372 
020374 


020376 
020402 
020404 
020410 
020412 
020414 
020416 
020420 
020422 
020424 
020426 
020430 


020432 
020436 
020436 
020442 
020446 


020450 


020452 


000241 
000416 


013705 


013700 


010066 
010166 
004736 


000207 


000000 


002376 
020452 


020452 


000002 
000004 





- MSLGET - 


CLC sINDICATE FAILURE (TIME-OUT). 

BR 6$ sEXIT WITH FAILURE, WORDS AREN'T EQUAL. 
3¢ 
; Non-zero time-out value. Loop, waiting for condition or time-out. 


23: MOV MSLCNT ,RS sLOAD MS LOOP COUNT. 

4$: MOV (R4),RO ;GET THE WORD TO TEST. 
MOV RO,62$ sSAVE WORD IN CASE THIS IS THE LAST. 
BIC R2,RO sMASK OUT UNTESTED BITS OF WORD. 
CMP RO,R3 sCOMPARE AGAINST DESIRED STATE WORD. 
SEC sSET CARRY IN CASE OF SUCCESS. 
BEQ 6$ sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 
DEC RS sCOUNT DOWN THE INSIDE MS LOOP COUNT. 
BNE 4$ sLOOP IF MS NOT UP. 
DEC R1 sDECREMENT THE MS TIME COUNT. 
BNE 2$ sIF TIME NOT UP, LOOP TO COUNT ANOTHER MS. 
CLC sCLEAR CARRY, WE TIMED-OUT. 


3¢ 
; Have either found condition, or timed-out (possibly from 0 time-out value). 
; Restore the last contents read from the test word. Exit routine. 


6$: MOV 62$,RO0 sPASS OUT THE LAST READ WORD. 
60$: PASS RO,R1 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV RO,ROSLOT( SP ) sPUT RO IN STACK SLOT. 
MOV R1,R1ISLOTCSP) sPUT R1 IN STACK SLOT. 
JSR PC ,ACSP)+ sRETURN TO PREGOS SUBRT. 
sRO - LAST READ WORD CHECKED FOR CONDITION. 
sRi - REMAINING TIME (O IF TIME-OUT OCCURED). 
RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 
3¢ 


; Local storage. 


628: -WORD 0 sSTORAGE FOR THE LAST READ WORD. 






SEQ 0073 
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SEQ 0074 
GLOBAL SUBROUTINE - MSLOOP - 
2795 -SBTTL GLOBAL SUBROUTINE - MSLOOP - 
2796 Peete Tri ri ri rit iii titi i titi tii titi ttt itt ttt i tit TT TT TT TTT TTT TTT TTT TT TTT TTT TTT TTT 
2797 3% - Test Loop subroutine - 
2798 3% This subroutine is a general purpose test loop subroutine. It is used 
2799 Hig to verify that ea certain action occurs before a time-out period. The 
2800 ;* calling routine passes in which bits should be set and cleared for the 
2801 3% desired condition and the time-out value in milli-seconds. 
2802 3% This routine checks for the desired condition upon entrance into the 
root 7% routine and then once each milli-second thereafter. 
;* 
2805 ;* INPUTS: Ri - Time-out value in milli-seconds (up to 64K ms). 
2806 3% R2 - Bit map of bits to test (1 indicates to test the bit). 
2807 7% R3 - Desired states of the indicated fields in R2. 
2808 3% R4 - Address of the word to test. 
eae 3* MSLCNT - Milli second software loop count. 
7* 
coak ;# OUTPUTS: CARRY - Success flag (set if condition is met before time-out). 
3* 
aeak 3* CALLING SEQUENCE: JSR PC ,MSLOOP 
281 3* 
2815 3;* COMMENTS: This routine works with or without a hardware clock, but the 
2816 3* calibration is only guarenteed when a line clock is available 
2817 3* on the system. 
2818 7% This routine can be used as a delay routine, by specifying the 
2819 3* desired delay as the time-out and specifying a condition to 
2820 3% look for which will not be met during the delay. 
2821 3* If a time-out value of 0 is specified, this routine checks for 
2822 3* the desired condition before returning. It indicates success 
ores 3% if the condition is met, failure otherwise. 
3% 
2825 3* SUBORDINATE ROUTINES CALLED: MSLGET. 
2826 SREKERKAREAKEEAAEAEAEARELAAESREASESEERERSAESASEREAEASARAEESARAAEREEREARERERELREDREREDE 
2827 
2828 020454 MSLOOP:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
nase 020454 004537 003776 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
2830 3+ 
2831 ; Calling the MSLGET routine from the MSLOOP routine isolates the caller of 
coat ; MSLOOP from the returned test word and remaining time-out values. 
2 37 
es 020460 004737 020340 JSR PC ,MSLGET s;CALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 
28 
2836 020464 60$: PASS sRESTORE GPRS, 
020464 004736 JSR PC,@CSP)+ ;RETURN TO PREGOS SUBRT. 
2837 020466 000207 RTS PC sCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 


— 
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ee 


020470 
020470 


020474 
020474 
020476 
020500 
020502 


020504 
020504 
020510 
020514 
020516 
020520 
020524 
020524 
020526 
020530 
020530 
020532 


020534 
020537 
020542 
020545 
020550 
020553 
020556 
020561 
020564 
020567 
020572 
020575 
020600 
020603 
020606 
020611 


004537 


104454 
000145 
020534 
000000 


012746 
012746 
010600 
104417 
062706 


104422 
000776 


003776 


020620 
000001 


000004 


- OOPS - 


123 
1 
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-SBTTL GLOBAL SUBROUTINE - OOPS - 

PARP C ICT ITT iit iri iii iii ti titi tii it ttti i titi ttt tt TT TTT TTT TTT TTT TTT TTT TTT TTT 
34 - Program abort subroutine - 

:* This subroutine is used to abort the program when a fatal error is 

3* detected in the program or the host system hardware. An error message 

;* is printed giving some information about the nature of the abort. 

3* 

3* INPUTS: Ri - Error code giving reason for abort. 

3* 

3* OUTPUTS: An error message is printed. 

3% A list of return PC values for all subroutine calls is printed. 


7* 

3# CALLING SEQUENCE: JSR PC ,OOPS 
3* 

3* COMMENTS: 


;* 
3* SUBORDINATE ROUTINES CALLED: None. 
S-— SREKSKEKAAARARAREARAEAEASKSEKREAEKARESASASERALAAASAREKELELELEASASEASEEEEEREEEERE 


OOPS:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
; REPORT “HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED.” ERROR. 
ERRSF 101,EM0101 
TRAP CSERSF 


-WORD 101 
-WORD  €&MO101 
-WORD 0 


; REPORT “PROGRAM HUNG, WAITING FOR A CONTROL-C.” 
PRINTF #€M0102 


MOV #€M0102, - 
MOV #1,-(CSP) 


MOV SP ,RO 
TRAP CSPNTF 
ADD 04 ,SP 
2s: BREAK sLOOK FOR OPERATOR CONTROL-C INPUT. 
TRAP C$BRK 
BR es sINFINITE LOOP. 
60$: PASS ;DON'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 


JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
RTS PC ; ROUTINE IN THE FUTURE, SO BE CONSISTANT. 


EMO101:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED. / 






SEQ 0075 


(SP) 
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2869 020620 


2870 


- OOPS - 





EM0102:: .ASCIZ /SNSAPROGRAM HUNG, WAITING FOR A CONTROL-C. <eeeeaeeeeeecesNaN/ 


-EVEN 





SEQ 0076 







CVDHADO DHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 64 
GLOBAL SUBROUTINE - PUFIFO - 


2872 -SBTTL GLOBAL SUBROUTINE - PUFIFO - 
2873 j POSSESSES SESSESESEESSSEESEESESAEESESEEDESEAESEEEEEEEEEESEEDESEEEEEDEOEEDEEES 






SEQ 0077 
































2874 36 - PURGE THE FIFO 

2875 A This routine tries to remove ell the cherecters from the FIFO. 

ode ;© Any BMP codes thet ere found are saved on the BMP code queue. 
3% 

2878 3@ INPUTS: RBUFA- Contains the address of the Receiver. 


34 
2881 ;* OUTPUTS: Carry bit - Indicates the state of the fifo, set:* purged. 
po | 34 BMPCQ - The contents of the BMP code queue mey be updated. 
3% 
2884 3# CALLING SEQUENCE: JSR PC ,PUFIFO 


3% 
2886 ;@ COMMENTS: 


2887 3* 
2888 ;# SUBORDINATE ROUTINES CALLED: SAVBMP. 
2889 § 9666666600666 6008600606 060606 66660666060 60600606066 06666606000600800060006000000600008 


2890 
2891 020716 PUFIFO: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

020716 004537 003776 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
2892 020722 012701 001000 MOV #512.,R1 sSET MAXIMUM TRY COUNT OF 512. 
co 020726 013704 002246 MOV RBUFA,R4 sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
2895 020732 011402 2s: MOV a sGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
ote 020734 100016 BPL sEXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 
2898 ; * Check if the reed cherecter is ectuelly e BMP code. 
ated s If it is, then save it on the BMP code queve to be reported leter. 

g= 

2901 020736 012700 070000 MOV #70000 ,RO sGENERATE A BIT MAP OF CHAR ERROR BITS 
2902 020742 040200 BIC R2,RO0 ; WHICH ARE NOT SET FOR CHAR. 
2903 020744 001006 BNE 4S sTHROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 


3° 
aoe ; Check if the read dete is modem stetus , BMP or Selftest?. 
= 


2907 020746 012700 000300 MOV #300 ,RO s CHECK IF BMP OR SELFTEST?. 

2908 020752 040200 BIC R2,RO sTRY TO CLEAR BMP FLAGS IN THE READ DATA. 

2909 020754 001002 BNE 4s sIF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 
2910 020756 004737 022262 JSR PC ,SAVBMP sSAVE BMP CODE ON THE QUEUE. 


2912 020762 005301 4$: DEC R1 sDECREMENT THE TRY COUNT. 
2913 020764 001362 BNE 2s sLOOP TO TRY AGAIN. 
2914 020766 000241 cLC sCLEAR CARRY,TO INDICATE FIFO NOT PURGED. 
2915 020770 000401 BR 60% sEXIT WITH CARRY CLEAR 
aoe 020772 000261 63: SEC SET CARRY, TO INDICATE FIFO PURGED. 
1 





2918 020774 608: PASS sRESTORE GPRS, 

020774 004736 JSR PC ,OC(SP)+ sRETURN TO PREGOS SUBRT. 
2919 sCARRY BIT, SET INDICATES FIFO PURGED. 
2920 020776 000207 RTS PC 
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.SBTTL GLORAL SUBROUTINE - ROPOR - 


SEQ 0078 





































2923 }OOOOO66000 06 0000 00 0000000600 0006 0006 4000000006 4000 000000000000000000000008000 
2924 3* - Read end verify Dete Pattern from Device Registers Routine - 
2925 3% This routine reads end verifies the roteted date pattern which hes 
2926 3¢ been written by the WOPDR subroutine. 
2927 3% Each active line's register's contents is read and compared with the 
2928 3% written dete. 
2929 3% After the unused and Read Only (RO) bits ere masked out, any errors ere 
2930 3% reported from this routine. 
2931 3% This routine will teke into eccount the type of write operation which 
tes} 3% wes performed by the WOPDR subroutine. 
3% 
2934 3 INPUTS: R2 - Used to pease in the dete pattern to be rotated € verified. 
2935 3% R3 - Byte indicator (- => lo byte, + => hi byte, 0 => both). 
2936 :a R4 - Operation type indicetor (- => BIC, + => BIS, 0 => MOV). 
2937 3% ACTLNS - Bit map of active lines on the device under test. 
2938 3% CSRA - Conteine the CSR eddrese of the Device under test. 
‘2939 3* DRADRT - Base eddress of device register eddress teble. 
2940 3% ERCNTB - Lebel et bese of error counters teble for lines. 
2941 +% ERRMSG - Set up with the proper error messege for this test. 
2942 1” ERRNBR - Set up with the proper error nuaber. 
2943 ie LPRO - Equeted to LPR reg offset from device CSR eddress. 
2984 @ NUMLNS - Number of lines on the device under test. 
2945 3% NDOERPT - Number of individuel dete errors to report on ea line. 
2946 + TXBFCO - Equeted to TBUFFCT reg offset from device CSR address. 
ted 3% UNBTTB - Bese eddress of the unused bit teble. 
3% 
2949 3# OUTPUTS: Error messeges may be printed et the operetor's console. 
2950 34 ERCNT - Error counters teble is updeted for line under test. 
2951 34 ERRBLK - Contents destroyed. 
2952 36 ERSMRF - Error summery flege bit set if line in summery mode. 
cons 3% UUT CSR - All bite cleered, except IND.ADR.REG field Gatvewet 
3% 
peas 3# CALLING SEQUENCE: JSR PC .ROPOR 
3% 
2957 3@ COMMENTS: For byte eccesses, only the specified byte is verified. 












2958 3@ 
2959 3@ SUBORDINATE ROUTINES CALLED: ER1601,ROLDAP. 
2960 f-- SORESESSESEEEEEEEEESEEEESEESESESESEDEESEEEEEEESESEEEEESESESEESESEESEEEOSE 


2961 
2962 021000 ROPOR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

021000 004537 003776 JSR RS , PREGOS sCALL REGISTER SAVE SUBRT. 
2963 021004 012737 016712 003774 MOV @E€R1601,ERRBLK ;,SET UP THE ADDRESS OF THE ERROR REPORT RTN. 





2964 i? 
2965 ; Determine whether register dete should be inverted froa dete pettern. 
CPS i- 
2967 021012 005704 TST RS sCHECK THE OPERAND TYPE INDICATOR. 
2968 021014 100001 BPL 2s s8IC WRITE PERFORMED? NO, USE STANDARD DATA. 
zee 021016 005102 Com R2 :YES, INVERT THE DATA PATTERN. 
¢ 
add ; Set up outer loop. 
i- 
ners 021020 005005 28: CLR aS sCLEAR LINE COUNTER TO SELECT LINE 0. 
i¢ 
2975 : The outer leep follows. Eech pese threugh thie leep reeds end conperes dete 
be s frem ell of the device registers for e perticuler line if the line ie ective. 
‘- 





Ne SS ee 


2978 
2979 


021022 
021026 
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001452 


013702 
004737 
005205 
020527 
002704 


004736 
000207 


000000 


021216 
161212 
002410 
000004 


002264 
002244 
000010 


000377 
000377 


177400 
177400 
002264 


020222 


021570 
000002 
000016 


021216 
021570 


000010 
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SEQ 0079 
43: MOV R2,708 sSAVE THE OUTER LOOP DATA PATTERN. 
MOV RS ,8CSRA sSET CSR IND.ADR.REG FIELD TO THIS LINE. 
MOV RS,.RO 
ASL RO 
BIT BITTSLCRO),ACTLNS 
BEQ 16$ sIS THE LINE ACTIVE? NO, SKIP THE LINE. 
MOV @LPRO,R3 sYES, INITIALIZE REGISTER OFFSET FOR LPR. 
3° 
; The inner loop follows. Each pass through this loop reads and compares 
; data from a device register. 
go 
6$ MOV R2,R4 sSAVE THE INNER LOOP DATA PATTERN. 
BIC UNBTTBC(R3),R2 ;REMOVE UNUSED BITS FROM EXPECTED DATA. 
MOV DRADRT(R3>,RO 
TST R3SLOT(SP) sCHECK THE ACCESS TYPE INDICATOR. 
BNE 83 sBYTE ACCESS? YES, GO PERFORM BYTE READ. 
-_ on :NO, PERFORM WORD READ OF DEVICE REGISTER. 
8$: BMI 10$ sLOW BYTE ACCESS? YES, GO DO LOW BYTE READ. 
INC 0 ;HIGH BYTE ACCESS. FORM HIGH BYTE ADDRESS. 
MOVB (RO),R1 sREAD THE HI BYTE OF THE DUT REGISTER. 
SWAB Ri sPUT HI BYTE BACK INTO THE HI BYTE. 
BIC @377,R1 sREMOVE THE UNUSED BYTE IN ACTUAL DATA. 
. —o sREMOVE THE UNUSED BYTE IN EXPECTED DATA. 
$ 
10$: MOVB (RO),R1 sREAD THE LOW BYTE OF THE DUT REGISTER. 
BIC #177400,R1 sREMOVE THE UNUSED BYTE. 
BIC #177400,R2 sFORM EXPECTED LOW BYTE FOR COMAPARISON. 
12$: BIC UNBTTBCR3),R1 ;REMOVE UNUSED BITS FROM ACTUAL DATA. 
CMP R1,R2 sCOMPARE ACTUAL AND EXPECTED DATA. 
BEQ 14$ sACTUAL = EXPECTED? YES, SKIP ERROR. 
JSR PC, wanes wad COUNT THE ERROR, CHECK FOR ERROR SUMMARY. 
BCS 14 USE ERROR SUMMARY? YES, SKIP ERROR. 
3No, weere “BAD BITC(S) IN DEVICE xxxxx REGISTER FOR LINE nn (D).” 
TRAP CSERROR 
14$: MOV R4,R2 sRESTORE THE INNER LOOP DATA PATTERN. 
JSR PC ,ROLDAP sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
ADD #2,R3 ;SET REGISTER OFFSET TO THE NEXT REGISTER. 
CMP R3, @TXBFCO sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
BLE 6$ ;sLOOP IF NOT ALL REG DONE FOR THIS LINE. 
; Back into the outer loop. Now set up for next line. Loop if not done. 
16$: MOV 70$,R2 sSET UP TO ROTATE THE DATA PATTERN. 
JSR PC ,ROLDAP sROTATE THE DATA PATTERN. 
INC R5 sCOUNT THIS LINE 
CMP RS, @NUMLNS sCOMPARE LINE COUNT WITH NUMBER OF LINES. 
BLT 4$ sLOOP IF SOME LINES NOT DONE. 
60$: PASS sRESTORE GPRS. 
JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
RTS PC 
70$: -WORD 0 sSTORAGE FOR DATA PATTERN OUTSIDE INNER LOOP. 





Cn ee ee 
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-— 


3033 


004537 


003776 


000020 
167410 
000001 


022406 
003770 


000012 


000012 


022406 





- REGTST - 


000002 


177776 


-SBTTL GLOBAL SUBROUTINE - REGTST - 

3O* £60066 6400666006060 6664 666606666 64666066 66666666 6660666606460666006464640646466064666646466466 
3¢ - Registers Test Subroutine - 

34 Subroutine to test the Device Under Test (DUT) registers. The used 
3¢ bits of the registers are either all cleared or all set and then the 
34 date pattern is written and verified using either word or byte 

34 accesses in read/write or read/modify/write mode. 

3% 

3@ INPUTS: R3 - Byte indicetor (- => low, + => high, 0 => both bytes). 
34 R4 - Access mode (-1 => set then BIC, 1 => clear then BIS, 
;4 (-2 => set them MOV, +2 clear then MOV). 

34 ERRNBR - Set up with initial error number. 

34 

:@ OUTPUTS: GPRSO - GPR save area 0 is destroyed. 

34 Device Under Test registers are written. 

34 Error messages may be printed at the operators console. 

3¢ 

3@ CALLING SEQUENCE: JSR PC ,REGTST 

34 

3;@ COMMENTS: This routine loop 16 times writing the same date pattern 

34 rotated left once each iteration. 

34 This routine can report errors INITIAL ERRNBR thru INITIAL +2. 
34 


3# SUBORDINATE ROUTINES CALLED: RDPOR,ROLDAP ,SWAPO,WDPOR 
F-- SHREK ERASSEEEESEEAEAEAEEAALESEAEEAESSHEEEESSAEEREEE ERED EEDEEEEEEEEEEEEEDES 


REGTST:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR R5,PREGOS ;CALL REGISTER SAVE SUBRT. 
3° 
; Set up the GPRs for the writting of the date pattern. 
_ 
MOV #16. .R5 ;SET UP LOOP COUNTER TO COUNT 16 ITERATIONS. 
MOV #167410,R2 sINITIALIZE THE DATA PATTERN. 
BIT @BITO,R4 ;TEST FOR R/W ACCESS. 
BNE 2s sR/M/W ACCESS? YES, R4 IS ALL SET UP. 
CLR RS 3NO, INDICATE R/W ACCESS. 
2s: 


3? 
; Set up the GPRs for the clearing or setting of all the used bits. 


MOV R4,RO sPASS OPERATION TYPE INDICATOR AROUND SWAPO. 
JSR PC ,SWAPO :GET ALTERNATE GPR SET IN R1 THRU RS. 
MOV ERRNBR ,R1 sSAVE THE INITIAL ERROR NUMBER. 
MOV RO,R4 
NEG R4 SET UP OP TYPE FOR CLEARING OR SETTING. 
CLR R2 sSET UP CLEAR WRITE PATTERN. 
CMP R4SLOT(SP),@2  ;TEST FOR CLEAR THEN MOV TEST SEQUENCE. 
BEQ 43 sCLEAR THEN MOV? YES, LEAVE WRITE PAT CLEAR. 
COM R2 sNO, SET ALL BITS OF WRITE PATTERN. 
4$: CLR R3 sINDICATE THAT WORD ACCESSES SHOULD BE USED. 
CLR RO sSET ALTERNATE BYTE EXPECTED DATA PAT TO CLEAR. 
CMP R4SLOT(SP),@-2 ;TEST FOR SET THEN MOV TEST SEQUENCE. 
BNE 6$ sSET THEN MOV? YES, LEAVE ALT BYTE PAT CLEAR. 
COM RO sNO, SET ALT BYTE EXPECTED DATA PAT TO ALL 1'S. 
6$: JSR PC ,SWAPO sRESTORE SWAPPED GPR VALUES TO R1 THRU RS. 


3° 
; Start of data pattern loop. 





SEQ 0080 








GLOBAL SUBROUTINE 


3090 021320 


3095 021320 
3096 021324 
3097 021330 
3098 021334 
3099 021340 


3104 021344 
3105 021350 
3106 021354 
3107 021360 
3108 021362 


3112 021364 
3113 021366 
3114 021370 
3115 021372 
3116 021376 
3117 021402 
3118 021404 


3122 021406 
3123 021412 
3124 021414 


3126 021416 
3127 021424 

021424 
3128 021426 


— 


004737 
004737 
010137 
004737 
004737 


004737 
005237 
004737 
005703 
001411 


010201 
010002 
005403 
005237 
004737 
005403 
010102 


004737 
005305 
003341 


013737 


004736 
000207 


022406 
023322 
003770 
021000 
022406 


023322 
003770 
021000 


003770 
021000 


021570 


002450 





- REGTST - 


83; 
3¢ 


(a 
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; Set or clear all the used bits of the device registers for all lines. 
; Verify that all the bits were set or cleared correctly. 


| ad 
JSR 
JSR 
MOV 
JSR 
JSR 
3¢ 


PC ,SWAPO 
PC ,WOPOR 
R1,ERRNBR 
PC ,ROPOR 
PC. SWAPO 


sGET ALTERNATE GPRS FOR SETTING INTIAL STATES. 
sGO CLEAR ALL USED REGISTER BITS, ALL LINES. 
sSET UP ERROR NUMBER TO INITIAL ERRNBR. 
sVERIFY ALL USED REGISTER BITS, ALL LINES. 
sRESTORE MAIN GPRS CONTENTS. 


; Write data patterns, all lower byte used bits, all registers, all lines. 
; Verify that the date pattern was written correctly. 


PC ,WOPDR 
ERRNBR 
PC ,RDPOR 
R3 

10$ 


sWRITE DATA PATTERN TO DEVICE REGISTERS. 
sSET ERROR NUMBER TO INITIAL +1. 

sVERIFY DATA PATTERN IN ALTERRED BYTE(S). 
sCHECK THE BYTE INDICATOR. 

sWORD ACCESS? YES, SKIP SECOND BYTE CHECK. 


3? 
; Check that the alternate (unmodified) byte is clear or set as expected. 


3¢ 
; Pepare 
a0 

10$: JSR 


003770 60$: MOV 


R2,R1 
RO,R2 
R3 


ERRNBR 
PC ,,ROPDR 
R3 


R1,R2 


sSAVE THE DATA PATTERN. 

sGET THE ALTERNATE BYTE EXPECTED DATA. 
sINDICATE THAT OTHER BYTE IS TO BE CHECKED. 
sSET ERROR NUMBER TO INITIAL<2. 

sVERIFY DATA PATS IN OTHER BYTES OF REGISTERS. 
sRESTORE BYTE INDICATOR. 

sRESTORE DATA PATTERN. 


the next date pattern and loop if not done. 


PC ,ROLDAP 

RS 

8$ 
GPRSOB , ERRNBR 


JSR 
PC 


PC,@(SP)-+ 


sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
sCOUNT THIS ITERATION OF THE LOOP. 

sALL PATTERNS DONE? NO, LOOP. 

sYES, RESTORE ERROR NUMBER AND EXIT. 

sGET THE ERROR NUMBR FROM GPR SWAP STORAGE. 
sRESTORE GPRS. 


sRETURN TO PREGOS SUBRT. 





SEQ 0081 
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GLOBAL SUBROUT INE 


3130 
3131 
3132 
3133 
3134 
3135 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3152 
3153 
3154 
3155 
3156 


3157 
3158 
3159 
3160 
3161 
3162 
3163 
3164 
3165 
3166 
3167 


3168 
3169 


3170 


poems 


021430 
021430 
021434 
021440 


021442 


021450 
021450 


021452 
021452 
021454 


004537 
005737 
001404 


012737 


104460 


004736 
000207 





SR ESE A ESN 



















SEQ 0082 

- REPSMR - 

-SBTTL GLOBAL SUBROUTINE - REPSMR - 

FO ¢ SRRRERRRAREEEEERAASAERAEEEEREAEERE EEE EEEEEEOEEEEEEEED OD EEEDEEEDEEEEEEED EEE 

34 - Report Error Summary Routine - 

;* This subroutine reports an error summary for those lines which have 

34 exceeded the number of individual errors to report for a single line 

74 in a single test. This parameter can be specified by the operator if 

3% he/she answers the Software Parameter Questions. 

7* 

3* INPUTS: ERCNTB - Label at base of line error counters table. 

34 ERRMSG - Address of primary error message. 

34 ERRNBR - Error number of errors in this routine. 

3% ERSMRF - “Report error summary for line” flags. 

3% 

3# OUTPUTS: ERRBLK - Address of error reporting routine (Destroyed). 

3% Summary messages may be printed at the operator console. 

3* 

3* CALLING SEQUENCE: JSR PC ,REPSMR 

3* 

3* COMMENTS: If no lines have exceeded the maximum number of individual 

3* errors to report, no messages are printed by this routine. 

34 Error summaries in this routine are reported as errors. 

34 The contents of ERRBLK are destroyed. 

3* 


3* SUBORDINATE ROUTINES CALLED: 
 Raliallli aceasta htt t itt ti ttt itt TTT TTT TTT TTT TTT 


REPSMR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
003776 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
002462 TST ERSMRF sCHECK THE “PRINT LINE ERROR SUMMARY” FLAGS. 
BEQ 60$ sEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 


3? 


; We have some error summaries to report. 


3- 
017160 003774 MOV %ER9004,ERRBLK ;SELECT ERROR REPORTING ROUTINE. 
3¢ 
; Report 
8 “ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: “ 
ERROR 


TRAP CSERROR 


60$: PASS sRESTORE GPRS. 
- pe JSR PC,@(SP)+ sRETURN TO PREGOS SUBRT. 
Ss 
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SEQ 0083 
GLOBAL SUBROUTINE - RESETT - 
3172 -SBTTL GLOBAL SUBROUTINE - RESETT - 
3173 eee eee aaa ae 
3174 34 - Reset Device Under Test - 
3175 34 This subroutine is used to reset the DUT to a known state. 
3176 3% If reset does not succesfully complete, ie. time-out occurs, then 
atte 3% an abort test error message is reported. 
1 3% 
3179 ;* INPUTS: CSRA - Contains the address of the CSR 
3180 3% TXBFCA - Contains address of DUT DMA Buffer Count Sigfeten: 
Ht 3* ERRTBL- ERRTYP,ERNBR,and ERRMSG set up correctly. 
1 3* 
3183 3# OUTPUTS: The DUT performs its reset function into a known state. 
3184 34 CARRY - Clear indicates the test is to be aborted. 
3185 3% ERRBLK - value may be destroyed. 
3186 ie IESTAT - TX and RX interrupt flags are cleared. 
eT 3% TX and RX interrupt enable bits in the DUT’s CSR are cleared. 
18 a 
cos 3# CALLING SEQUENCE: JSR PC ,RESETT : 
1 :* 
3191 :* COMMENTS: This subroutine can report errors with numbers initial ERRNBR 
ares 3% This routine does not destroy the value of ERRNBR. 
1 3* 
3194 3# SUBORDINATE ROUTINES CALLED: DELAY,MSLGET. 
3195 9000000000000000000000000000000000000000000000000000000000000000000000000000000 * 
3196 § 
3197 021456 RESETT:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
021456 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
aoe 021462 012702 000040 MOV #BITOS ,R2 ;SET BIT MASK OF MASTER RESET BIT. 
1 3+ z 
3200 ; Test the state of the master reset bit in the CSR. 
3201 ; If MR is set then wait for self-test to complete. 
wee 3 If time-out occurs, report the error and pass-out abort test indicator. 
3° 
3204 021466 013704 002244 MOV CSRA,R4 ;GET THE ADDRESS OF THE DUT’S CSR. 
3205 021472 030214 BIT R2,(R4) ;CHECK STATE OF MASTER RESET BIT. 
3206 021474 001406 BEQ 2s ;DON'T DELAY IF MR IS ALREADY CLEAR. 
3207 021476 005003 CLR R3 ;SET UP DESIRED STATE OF MASTER RESET BIT. 
3208 021500 012701 004704 MOV #2500. ,R1 ;PASS TIME-OUT VALUE OF 2.5 SECONDS. 
3209 021504 004737 020340 JSR PC ,MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
sr 021510 103012 Bcc 4$ :GO REPORT ERROR IF TIMEOUT OCCURRED. 
211 
3212 


3? 
Set Master Reset bit in CSR. Clear TX and RX enable bits, etc. 


3213 8 

3214 ; Skip the selftest. 
a. ; Time-out of 2.5 secs, just in case the self-test executes. 

216 3° 

3217 021512 010277 160526 2s: MOV R2,8CSRA ;SET MASTER RESET BIT, DISABLE TX AND RX INTS. 
meee 021516 004737 022330 JSR PC ,SKPSTS sTRY TO SKIP THE SELFTEST. 

21 34 

3220 3 Set Self-test time-out of 2.5 seconds, and wait for M.R to clear. 

3221 3 If Time-out occurs, then report the fatal error and pass-out the abort 
a $ test indicator. 

ge 

3224 021522 005003 CLR R3 ;SET UP DESIRED STATE OF MASTER RESET BIT. 
3225 021524 012701 004704 MOV #2500. ,R1 sPASS TIME-OUT VALUE OF 2.5 SECONDS. 

3226 021530 004737 020340 JSR PC ,MSLGET sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR. 
3227 021534 103410 BCS 6$ ;SKIP ERROR REPORT IF MR CLEARED IN TIME. 








— 
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GLOBAL SUBROUTINE 


pases 


021536 
021542 


021550 
021550 
021552 
021554 


021556 
021562 


021564 
021564 


021566 


012701 


012362 


- RESETT - 


3¢ 
; Set up error message to report “fatal error found during reset,test aborted”. 
; Indicate test is to be aborted by clearing the carry bit. 


4$: 


012737 017010 003774 


104460 
000241 
000403 


005037 


000261 


004736 
000207 


002330 


MOV #€M1601,R1 sPASS ERROR MESSAGE TO REPORT. 

MOV ER1603,ERRBLK ;PASS ADDRESS OF ERROR HANDLING ROUTINE. 
eat —8" OCCURRED WAITING FOR MASTER RESET TO CLEAR” 
; ” ” 


ERROR ; >>>>> ERROR <<<<< 

TRAP CSERROR 
CLC sINDICATE TEST IS TO BE ABORTED. 
BR 60$ sEXIT THIS SUBROUTINE, ABORT TEST INDICATOR. 


3° 
; Clear TX and RX Interrupt enable status flags in IESTAT. 
; Exit with continue test indicator set (ie,carry set). 


6$: 


60$: 





CLR IESTAT sCLEAR TX AND RX INTERRUPT STATUS FLAGS. 
SEC sINDICATE SUCCESS, CONTINUE TEST. 
PASS sRESTORE GPRS, PASS THE FOLLOWING INTACT: 


JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 
ats pc sCARRY BIT: IF CLEAR, INDICATES ABORT TEST. 






SEQ 0084 
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SEQ 0085 
GLOBAL SUBROUTINE - ROLDAP - 
3251 -SBTTL GLOBAL SUBROUTINE - ROLDAP - 
3252 PPT Tr iri ri i titi titi ii iri titi titi iti titi ttt TTT tT TTT TT TTT TTT TTT TT TTT TTT TT TTT TTT 
3253 3% - ROtate Left DAta Pattern 
3254 3* This routine rotates the passed input date pattern left,without going 
3255 3* through the carry.The carry is initially set or cleared depending 
3256 :* upon the state of the MSB of the data pattern, before a ROL instruction 
3257 3% is executed. 
3258 3* 
+44 3# INPUTS: R2 - Contains the data pattern to be rotated 
3% 
=. 3* OUTPUTS: R2 - Contains the rotated data pattern 
3* 
3263 ;# CALLING SEQUENCE: JSR PC ,ROLDAP 
3264 3* 
3265 3* COMMENTS: 
3266 3* 
3267 3* SUBORDINATE ROUTINES CALLED: NONE 
3268 FRASKAEAARAKEKRRAERAEAKEAAAAEAESEERSSEASSEKRELASEASAESERAAERALESAEAEEEECEEEADEAEEEERESL 
3269 
3270 021570 ROLDAP : : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
021570 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3271 021574 010202 MOV R2,R2 ;SET PROCESSOR STATUS CODES 
3272 021576 005702 TST R2 ;CHECK MSB 
3273 021600 100402 BMI 2$ ;BRANCH IF SET 
3274 021602 000241 CLC ;CLEAR CARRY BIT IF MSB CLEAR 
3275 021604 000401 BR - 4$ 3 
3276 021606 000261 2s: SEC ;SET CARRY IF MSB SET 
3277 021610 006102 4$: ROL R2 sROTATE DATA PATTERN LEFT 
3278 021612 60$: PASS R2 sRESTORE GPRS,EXCEPT 
021612 010266 000006 MOV R2,R2SLOTC SP) sPUT R2 IN STACK SLOT. 
021616 004736 JSR PC,A(SP)+ ;RETURN TO PREGOS SUBRT. 
3279 sR2 - CONTAINS THE ROTATED DATA PATTERN 
3280 021620 000207 RTS PC 


— 
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SEQ 0086 
GLOBAL SUBROUTINE - RSTRPT - 
3282 -SBTTL GLOBAL SUBROUTINE - RSTRPT - 
3283 PASM Tit iriitit it titi it tii iit iit i tit it tit ttt TTT TT TTT TTT TTT TTT TT TT TTT TTT TTT TTT 
3284 3* - Report any Reset Errors Routine - 
3285 34 This routine determines if any error codes are among the diagnostic 
3286 ;* codes reported placed in the DUT received character FIFO by the 
3287 . ;* Self-test. If any non BMP error codes are found, or if other errors 
3288 3* are encountered, appropriate errors are reported. Any BMP codes that 
3289 3% are found, are placed on the BMP code queue to be reported later. 
3290 3% This routine also purges the DUT FIFO looking for any characters 
soos 3* or modem status codes. If any are found, errors are reported. 
3% 
3293 ;* INPUTS: ERRMSG - Address of the primary error message. 
3294 34 ERRNBR - Error number of first error reported by this rouitne. 
3295 3% NUMLNS - Equated to the number of line on the DUT. 
te 3% RBUFA - Contains address of the DUT receiver FIFO. 
3* 
3298 ;* OUTPUTS: CARRY - Success flag (set if FIFO cleared successfully). 
3299 1s ERRBLK - Address of the error report routine (Destroyed). 
aay 3* Error messages can be printed at the operators console. 
1 3* 
tee 3* CALLING SEQUENCE: JSR PC, ,RSTRPT 
;* 
3304 ;* COMMENTS: This subroutine can report errors with numbers Initial ERRNBR 
3305 3* thru Initial ERRNBR+4. 
zoos :* This routine does not destroy the value of ERRNBR. 
3* 
3308 ;* SUBORDINATE ROUTINES CALLED: ERO503,ER9007,ER9008,SAVBMP. 
3309 Sr - EONS EEE EASES OS O44O4EEEEEE EEE EKEEEKESEEEEREREERERE 
3310 
3311 021622 RSTRPT:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
—_ 021622 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
1 3+ 
3313 ; Read correct number (number of line on DUT) of chars from the FIFO. 
ce ; Verify that each char is a selftest success vode. 
1 := 
3316 021626 005003 CLR R3 ;CLEAR THE CODE COUNTER. 
3317 021630 013705 003770 MOV ERRNBR ,RS ;SAVE ERRNBR FOR RESTORATION LATER. 
3318 021634 017702 160406 2s: MOV ORBUFA ,R2 ;READ A CHAR FROM THE DUT FIFO. 
aH 021640 100412 BMI 4s ;SKIP ERROR IF DATA.VALID SET FOR CHAR. 
7° 
eet 3; We expect a selftest code, but this FIFO slot is empty. 
= 
3323 021642 010537 003770 MOV RS,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
3324 021646 012701 015522 MOV 9EM9018,R1 sPASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 
534 021652 012737 017262 003774 MOV #ER9007,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
6 i* 
3327 ; Report error with number Initial ERRNRB. 
— ; “NO SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE nn AFTER RESET.” 
_ 
3330 021660 ERROR 5 >>>>> ERROR <<<c<, 
021660 104460 TRAP CSERROR 
3331 i¢ 
cone ; Inidicate “success” (because FIFO is purged), and exit this routine. 
7 
3334 021662 000261 SEC ;SET SUCCESS FLAG. 
fas 021664 000545 BR 60$ ;EXIT ROUTINE. 
i¢ 


oe 
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GLOBAL SUBROUTINE 


ee 


021666 
021672 
021674 


021760 
021760 
021762 


021764 
021770 
021776 
022002 


022010 
022010 


022012 
022014 
022020 


022022 


010537 
005237 
012701 
012737 


104460 
000413 


010537 
062737 
012701 
012737 


104460 


005203 
020327 
002705 


012704 


070001 


000200 
000203 
000201 
000300 


022262 


003770 
003770 
015547 
017340 


003770 
000002 
015532 
017262 


000010 


000022 


- RSTRPT - 


003774 


003770 
003774 





; Determine if this is not a selftest code. 
4$: y MOV #70001 ,,RO GENERATE BIT MAP OF ANY CLEAR ERROR BITS OR 
BIC R2,RO ; BIT O WHICH ARE CLEAR. 
BNE 8$ 3GO TO REPORT ERROR IF THIS IS NOT A TEST CODE. 
7¢ 
; We have a test code (either BMP or selftest code). 
; Determine what type of code we have. 
ae 
BIT *BIT7,R2 sTEST ROM VERSION CODE INDICATOR BIT. 
BEQ 10$ s;SKIP ERRORS IF SELFTEST ROM VERSION CODE. 
CMPB ss R2,, 8203 sCHECK IF SKIP SELF TEST CODE. 
BEQ 10$ sSKIP ERROR REPORT IF SKIP SELF TEST CODE FOUND 
CMPB = R2, #201 s;CHECK IF NULL CODE PRESENT. 
BEQ 10$ s;SKIP ERROR REPORT IF SELF TEST NULL CODE. 
MOV #300 ,RO sTEST CODE TYPE BITS FOR BOTH CODE 
BIC R2,RO s TYPE BITS SET CINDICATING BMP CODE). 
BNE 6$ ;IF IT IS NOT A BMP CODE GO REPORT ERROR. 
JSR PC ,SAVBMP sSAVE THE BMP CODE ON THE QUEUE. 
BR 10$ 3GO GET THE NEXT CHARACTER FROM THE FIFO. 
3¢ 
; We have a selftest error code. 
go 
6$: MOV RS,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
INC ERRNBR sCALCULATE INITIAL ERROR NUMBER PLUS 1. 
MOV #EM9020,R1i sPASS ERROR MESSAGE INFO TO ER9008 ROUTINE. 
MOV #ER9008,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3* 
; Report error with number Initial ERRNRB + 1. 
F “UNEXPECTED SELFTEST ERROR CODE FOR LINE nn IN FIFO AFTER RESET:” 
ERROR ; >>>>> ERROR <<<ccc, 
TRAP CSERROR 
BR 10$ ;GO TO END OF LOOP. 
3+ 
; We have a non-selftest code (either BMP code or date char). 
Tod 
MOV RS ,ERRNBR sRESTORE ERROR NUMBER TO INTITIAL VALUE. 
ADD #2 ,ERRNBR sCALCULATE INITIAL ERROR NUMBER PLUS 2. 
MOV #EM9019,R1 sPASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 
MOV ®ER9007,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3¢ 
; Report error with number Initial ERRNRB + 2. 
; “NON-SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE mn AFTER RESET.” 
ERROR ; >>>>> ERROR <<<<<, 
TRAP CSERROR 
3+ 
; End of loop, loop if not all chars have been read from the FIFO. 
g2 
10$: INC R3 ;SET CODE COUNTER FOR NEXT ITERATION OF LOOP. 
CMP R3, @NUMLNS ;TEST FOR ALL CODES READ. 
BLT 2s ;LOOP IF NOT CHARS READ FROM FIFO. 


3¢ 


; Purge the FIFO until DATA.VALID is clear or until too many chars are read. 
- 
MOV #18. ,R4 sINITIALIZE THE CHARACTER COUNTER. 
























SEQ 0087 
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SEQ 0088 
GLOBAL SUBROUTINE - RSTRPT - 
3392 022026 010537 003770 MOV RS ,ERRNBR sGET INITIAL VALUE OF THE ERROR NUMBER. 
3393 022032 062737 000003 003770 ADD #3 ,ERRNBR sCALCULATE ERROR NUMBER OF NEXT ERROR. 
3394 022040 012737 017340 003774 MOV @ER9008,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3395 022046 017702 160174 12$: MOV ORBUFA ,R2 sREAD A CHARACTER FROM THE DUT FIFO. 
3396 022052 000261 SEC sINDICATE SUCCESS IN CASE DATA.VALID IS CLEAR. 
oa 022054 100051 BPL 60$ sEXIT ROUTINE WITH SUCCESS IF DATA.VALID CLEAR. 
i? 
3399 3; We have a character. 
cea ; Determine if character is a data character. 
ad 
3402 022056 012700 070000 MOV #70000 ,RO sTEST BITS 12 THRU 14 OF THE 
3403 022062 040200 BIC R2,RO0 ; CODE READ FROM THE DUT FIFO. 
ae 022064 001403 BEQ 14$ sSKIP THIS ERROR IF CODE IS NOT A DATA CHAR. 
3+ 
tee ; We have an unexpected data cliaracter: set up and go to report error. 
3408 022066 012701 015573 ; MOV #EM9022,R1 sSELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
co 022072 000423 BR 22$ :GO TO REPORT THIS ERROR. 
41 i+ 
3411 ; We have an unexpected code. 
cae ; Determine if the code is a modem status code. 
1 3° 
3414 022074 032702 000001 14$; BIT #BITO,R2 ;TEST MODEM STATUS INDICATOR BIT OF CODE. 
eee 022100 001003 BNE 16$ sSKIP THIS ERROR IF NOT MODEM STATUS CODE. 
16 3¢ 
aH i We have a modem status code: set up and go to report error. 
18 3° 
3419 022102 012701 015612 MOV 9EM9023,R1 s;SELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
coor 022106 000415 BR 22$ 3GO TO REPORT THIS ERROR. 
1 i¢ 
3422 ; We have an onboard test code. 
pe ; Determine if this code is a BMP code. 
424 3: 
3425 022110 032702 000200 16$: BIT *BIT7,R2 sTEST THE ROM VERSION BIT OF THE CODE. 
3426 022114 001404 BEQ 18$ sGOTO SET UP FOR SELFTEST CODE IF ROM VERSION. 
3427 022116 012700 000300 MOV #300 ,RO 
3428 022122 040200 BIC R2,RO0 sTEST THE ERROR TYPE BITS OF THE CODE. 
cone 022124 001403 BEQ 20$ ;SKIP THIS ERROR IF BMP CODE. 
3* 
oot ; We have a selftest code: set up and go to report error. 
3432 $- 
3433 022126 012701 015634 18$: MOV 9EM9024,R1 ;SELECT ERROR MSG INFO FOR ERO808 ROUTINE. 
aes 022132 000403 BR 22$ ;GO TO REPORT THIS ERROR. 
4 i¢ 
4 ; We have ea BMP code: save it on the queue. 
4 “Teg 
3438 022134 004737 022262 20$: JSR PC ,SAVBMP s;SAVE THE BMP CODE ON THE QUEUE. 
3439 022140 000401 BR 243 ; 
3440 3+ 
3441 ; Report the error with error number of Initial ERRNBR + 3. 
+67 | 3 “UNEXPECTED xxx xxxx FOR LINE nn IN FIFO AFTER RESET: ” 
§° 
3444 022142 228: ERROR : >>>>> ERROR <<cc<, 
022142 104460 TRAP CSERROR 
3445 3° 
3446 ; End of loop. 
3447 ; Count the cheracter we just received, and check for too many received. 


pee 















CVDHADO OHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 70-3 
GLOEAL SUBROUTINE - RSTRPT - 


SEQ@ 0089 












3448 3° 
3449 022144 005304 24%: DEC R4 sCOUNT THIS CHARACTER. 
coe 022146 001337 BNE 12$ ;LOOP IF NOT TOO MANY CHARACTERS PURGED. 
i i¢ 
3452 ; We read too many valid cheracters while trying to purge the FIFO. 
3453 ; Report error and exit without success. 
cone 3 “FIFO WILL NOT PURGE (DATA.VALID STUCK SET), REMAINDER OF TEST SKIPPED.” 
— 
3456 022150 012701 015411 MOV 9E€M9017,R1 ;SELECT PROPER ERROR MESSAGE. 
3457 022154 010537 003770 MOV RS ,ERRNBR ;GET INITIAL ERROR NUMBER. 
3458 022160 062737 000004 003770 ADD 04 ,ERRNBR sCALCULATE INITIAL ERRNBR «+ 4. 
3459 022166 012737 016470 003774 MOV @EROSO3,ERRBLK ;SELECT PROPER ERROR REPORT ROUTINE. 
3460 s;PRINT ERROR REPORT. 
3461 022174 ERROR ; >>>>> ERROR <<ccc, 
022174 104460 TRAP CSERROR 
ter) 022176 000241 CLC sCLEAR THE SUCCESS FLAG. 
3464 022200 60$: PASS sRESTORE GPRS, 
022200 004736 JSR PC ,8(SP)-+ ;RETURN TO PREGOS SUBRT. 
3465 022202 000207 RTS PC ; CARRY - SUCCESS FLAG (SET IF FIFO IS PURGED). 


ee 





| a 
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SEQ 0090 
GLOBAL SUBROUTINE - RXIEO - 

3467 -SBTTL GLOBAL SUBROUTINE - RXIEO - 
3468 3% 0606606666666 666066666666 660660660666 66068 66066606 06066064606 0660666606666866006606060600% 
3469 3¢ - RECEIVER INTERRUPT DISABLE - 
oy ;* This routine is used to disable receiver interrupts in the DHV11. 

;* 
3472 3;@ INPUTS: NONE . 
3473 3% 
3474 3@ OUTPUTS: The RX.INT.ENBL bit is cleared in the DUT CSR. 
3475 3% IESTST -conteins the updeted status of the TX end RX interrupt 
3476 ;* enable bits. 
3477 3% 
od 3@ CALLING SEQUENCE: JSR PC ,RXIEO 

3% 
3480 3* COMMENTS: The contents of the indirect address register field in 
3481 3% the DUT CSR ere destroyed. 
3482 ;* 
3483 3# SUBORDINATE ROUTINES CALLED: NONE. 
3484 F- > 686606600666 6660066 66 6006 66 660606060060 66 00066 66060066060 0600606060606060606000060 0060888 
3485 022204 010046 RXIEO:: MOV RO, -(SP) sSAVE CONTENTS OF RO ON THE STACK. 
3486 022206 106746 MFPS -CSP) sSAVE PROCESSOR PRIORITY ON STACK. 
3487 022210 106427 000340 MTPS @PRIO7 sIGNORE ANY INTERRUPT THAT MAY BE GENERATED. 
3488 022214 042737 137777 002330 BIC 137777, IESTAT ,CLEAR RX. INT.ENBL BIT IN IESTAT. 
3489 022222 013777 002330 160014 MOV IESTAT,@CSRA sDISABLE RX INTERRUPTS. 
3490 022230 106426 MTPS (SP)+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
3491 022232 012600 MOV (SP)+,RO sRESTORE RO. 
3492 022234 000207 RTS PC 


er 
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- RXIE1 - 









-SBTTL GLOBAL SUBROUTINE - RXIE1 - 
3495 $Oo bhOO6O00 060006 00000060000 060000 000000 065000060000 000000000000000000000000008 
3496 3% - RECEIVER INTERRUPT ENABLE - 
This routine is used to enable receiver interrupts in the DHV11. 


& 

INPUTS: 
be 

OUTPUTS: 


















The RX.INT.ENBL bit is set in the DUT CSR. 

3502 34 IESTST -contains the updated status of the TX and RX interrupt 
3503 3% enable bits. 
3504 3% 
aoe 3# CALLING SEQUENCE: JSR PC ,RXIEL 

fe 
3507 3# COMMENTS: The contents of the indirect address register field in 
cae 3 the DUT CSR ere destroyed. 

3% 









3510 3# SUBORDINATE ROUTINES CALLED: NONE. 
3511 $-- $h660660604006000040F8 SF EEEEEEEEEEEEEDERESEEREEEEREDESEEEEEDEESEDEEDOREEEED 
3512 







3513 022236 052737 000100 002330 RXIE1:: BIS @BITO6,IESTAT  ;SET RX. INT.ENBL BIT IN IESTAT. 

3514 022244 042737 137677 002330 BIC #137677, IESTAT ;CLEAR ALL OTHER BITS, EXCEPT TX AND RX I.E. 
3515 022252 013777 002330 157764 MOV IESTAT,@CSRA sENABLE RX INTERRUPTS. 

3516 022260 000207 RTS PC 





—_— 
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GLOBAL SUBROUTINE - SAVBMP - 















SEQ 0092 


3518 -SBTTL GLOBAL SUBROUTINE - SAVBMP - 
3519 yee SOOREOEOEEEEEAEEEDEREDASEEEEERODEEAREEESEE DEEDES EDEEEEDEEEDEEEEEEDEREEEDODS 
3520 34 - Seve BMP codes Routine - 
3521 34 This routine saves the peremeter passed in, onto the BMP code queue 
oes 3* together with the number of the currently executing test. 

34 
3524 3@ INPUTS: R2 - Contains the BMP code that is to be placed on the queue. 
3525 36 BMPCQP - Contains address of next location in the bmp queue. 
3526 34 BMPCQB - Lebel at base of the BMP code queue. 
3527 3@ BMPCQE - Lebel of next location after the end of the BMP queue. 
os 34 TSTNUM - Contains the number of the current test. 

je 
3530 3@ OUTPUTS: BMPCQP - Incremented by 4. 
as 34 The contents of the BMP code queue are updated. 

3% 
ot 3@ CALLING SEQUENCE: JSR PC. SAVBMP 

34 
3535 :* COMMENTS: If the overflow occurs then the last location will be 
a :¢ overwritten by any subsequent attempts to update the queue. 

ro 
3538 3# SUBORDINATE ROUTINES CALLED: None. 
3539 t-- SERRE EEASEEASESEESSESAESSSSESESEEASESESEEESERER ERED EE EEEEEE DADE DERE EEEES 
3540 
3541 022262 SAVBMP:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

022262 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3542 022266 013704 002524 MOV BMPCQP ,R4 sGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 
3543 022272 113724 002326 MOVB TSTNUM,(R4)>+ sSAVE THE CURRENT TEST NUMBER ON THE QUEUE. 
3544 022276 005204 INC R4 s INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 
3545 022300 042702 177400 BIC #177400,R2 sCLEAR THE UNWANTED BITS FROM THE BMP CODE. 
3546 022304 010224 MOV R2,(R4)+ sSAVE THE BMP CODE ON THE QUEUE. 
3547 022306 020427 002726 CMP R4, @BMPCQE sCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 
3548 022312 103402 BLO 2s GO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 
3549 022314 162704 000004 SUB 04,R4 sRESET THE POINTER TO THE LAST LOCATION IN QUE. 
va 022320 010437 002524 2s: MOV R4 ,BMPCQP ;SAVE THE POINTER. 
1 
3552 022324 60$: PASS sRESTORE GPRS. 
022324 004736 JSR PC, a(SP)-+ sRETURN TO PREG9S SUBRT. 

3553 022326 000207 RTS PC 


— 
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SEQ 0093 


GLOBAL SUBROUTINE - SKPSTS - 
3555 -SBTTL GLOBAL SUBROUTINE - SKPSTS - 
3556 gee SOEESAEEEESSEEAESEAEEEAEEEREAEASAEREAEAEAEREAEAEAEREREREREREEEREEEEEEEEEES 
3557 i - Skip Selftest Routine - 
3558 3@ This subroutine is used to skip the selftest after a DUT reset has been 
3559 3¢ initiated. It must be entered immediately after setting the DUT Master 
3560 34 Reset routine or after the execution of a bus reset (because of timing 
3561 3¢ considerations). 
3562 ia 
3563 3# INPUTS: CSRA - Contains address of the DUT CSR. 
eae i# TXBFCA - Contains address of DUT DMA Buffer Count register. 
34% 
oe 3@ OUTPUTS: Skip selftest codes are written to the DUT registers. 
34 
3568 3# CALLING SEQUENCE: JSR PC,SKPSTS 
3569 34 
3570 :@ COMMENTS: 
3571 34 
3572 3# SUBORDINATE ROUTINES CALLED: DELAY. 
3573 i-- SOCE666006 0666660006 00664600 60 6600000066066060006060000000000000040440040408484 
3574 
3575 022330 SKPSTS:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
022330 004537 003776 JSR RS ,PREGOS s;CALL REGISTER SAVE SUBRT. 
3576 022334 012704 000012 MOV #10. ,R4 sPASS DELAY VALUE OF 10 MILLI-SECONDS. 
kd 022340 004737 020300 JSR PC ,DELAY sDELAY FOR 10 MILLI-SECONDS. 
oth ; Write skip self-test code (52525) to all the indexed DUT Registers. 
3581 022344 012701 000050 MOV @NUMLNS!BITOS,R1 ;FORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD. 
3582 sTHE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
3583 ; LACK OF A M.R. BIT WRITE LOCK-OUT ON THE DHV11-M. 
3584 022350 012703 052525 MOV #52525 ,R3 sINITIALISE THE SKIP SELF-TEST CODE. 
3585 022354 005301 4$: DEC R1 sSELECT THE NEXT SET OF DEVICE REGISTERS. 
3586 022356 013704 002244 MOV CSRA,R4 sGET THE ADDRESS OF THE CSR OF THE DUT. 
3587 022362 010124 MOV R1,(R4)+ sSELECT A BANK OF DUT REGISTERS. 
3588 022364 010324 63: MOV R3.CR4)+ sWRITE THE CODE TO A DUT REGISTER. 
3589 022366 020437 002262 CMP R4,TXBFCA sCOMPARE POINTER WITH LAST REGISTER ADDRESS. 
3590 022372 103774 BLO 6$ sLOOP IF NOT ALL REGS DONE IN THIS BANK. 
3591 022374 032701 000017 BIT #17,R1 sTEST FOR IND.ADR.REG FIELD DECREMENTED TO 0. 
te 022400 001365 BNE 4$ sLOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 
9 
3594 022402 60$: PASS sRESTORE GPRS. 
022402 004736 JSR PC,a(SP)-+ sRETURN TO PREGOS SUBRT. 
3595 022404 000207 RTS PC 


—— 





Ne 
CVDHADO DHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 75 


GLOBAL SUBROUTINE - SWAPO - 



















SEQ 0094 


3597 -SBTTL GLOBAL SUBROUTINE - SWAPO - 
3598 5 Oo SERRE EEEAAEEEEEEEEEEDAEDEEEDDDEEEEEEE DEED OEE EEOEOEO4OEO804400000040008008 
3599 34 - Swap GPRs With GPR Set 0 Routine - 
3600 34 This subroutine swaps the present contents of GPRs R1 thru R5 with 
3601 3* the contents of the number zero GPR save area. The contents of RO 
3602 34 are not altered by this subroutine. 
3603 3% 
3604 3@ INPUTS: GPR contents Ri thru R5. 
fone i GPRSOB - Lebel at base of GPR save area number zero. 
3* 
3607 3# OUTPUTS: Ri thru RS contain the previous contents of GPR save area 
3608 34 zero words 1 thru 5 respectively. 
3609 34 GPRSO - GPR save area 0 words 1 thru 5, contain previous 
ayy 3% contents of GPRs Ri thru R5 respectively. 
1 3% 
ey 3* CALLING SEQUENCE: JSR PC ,SWAPO 
61 3* 
cong 3@ COMMENTS: The state of the CARRY flag is not alterred by this routine. 
3* 
3616 ;* SUBORDINATE ROUTINES CALLED: None. 
3617 F-- SHRRAAEAEEAEESEAEREEASEAAEAEEAAEAAAREREAARARRAEE EE AREREAEAAEDEEEEDEREREEEES 
3618 
Po 022406 010046 SWAPO:: MOV RO, -(SP) ;SAVE THE CONTENTS OF RO. 
620 3+ 
rt ; Load the stack from the GPRs. 
3623 022410 010146 : MOV R1,-CSP) sSAVE THE CONTENTS OF R1. 
3624 022412 010246 MOV R2,-(SP) sSAVE THE CONTENTS OF Re. 
3625 022414 010346 MOV R3,-CSP) sSAVE THE CONTENTS OF R3. 
3626 022416 010446 MOV R4,-(SP) sSAVE THE CONTENTS OF R4. 
al 022420 010546 MOV RS,-(SP) sSAVE THE CONTENTS OF R5. 
62 3¢ 
44 ; Load the GPRs from the GPR save area 0. 
3631 022422 012700 002450 . MOV @GPRSOB,RO ;GET THE BASE ADDRESS OF GPR SAVE AREA 0. 
3632 022426 012001 MOV CRO)+,R1 ;LOAD Ri WITH GPR SAVE AREA 0 WORD 1. 
3633 022430 012002 MOV (RO)+,R2 sLOAD R1 WITH GPR SAVE AREA 0 WORD 2. 
3634 022432 012003 MOV (RO)+, RZ ;LOAD R1 WITH GPR SAVE AREA 0 WORD 3. 
3635 022434 012004 MOV (RO)+,R4 ;LOAD R1 WITH GPR SAVE AREA 0 WORD 4. 
ees 022436 012005 MOV CRO)+,RS sLOAD R1 WITH GPR SAVE AREA O WORD S. 
6 3¢ 
at" ; Load the GPR save area 0 from the stack. 

' 3640 022440 012640 : MOV (SP)+,-CRO) ;LOAD GPR SAVE AREA 0 WORD 5 WITH SAVED RS. 
3641 022442 012640 MOV (SP)+,-CRO) ;LOAD GPR SAVE AREA 0 WORD 4 WITH SAVED R4. 
3642 022444 012640 MOV (SP)+,-CRO) ;LOAD GPR SAVE AREA © WORD 3 WITH SAVED R3. 
3643 022446 012640 MOV (SP)+,-CRO) ;LOAD GPR SAVE AREA O WORD 2 WITH SAVED Re. 
ee 022450 012640 MOV (SP)+,-CRO) ;LOAD GPR SAVE AREA 0 WORD 1 WITH SAVED R1. 

64 
ae 022452 012600 MOV (SP)+,RO sRESTORE THE INITIAL VALUE OF RO. 
64 

3648 022454 000207 RTS PC 
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GLOBAL SUBROUTINE 


3650 
3651 
3652 
3653 
3654 
3655 
3656 
3657 
3658 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
3668 
3669 
3670 
3671 


3672 
3673 
3674 


3675 
3676 


3677 
3678 


3679 


022456 004537 003776 
022462 012701 022500 
022466 012737 017010 


022563 000 


022564 
022564 004736 
022566 000207 








- TSABRT - 
-SBTTL 


FOF SREREAREKSHEASEKASSEAERASESASEEASEHRADEAHESSEKAKEARESEESESEAEEEEESEEEEEEESD EEE 


34 - TEST ABORT ROUTINE - 

34 This subroutine is used when a non-test related error has been found 
:* during the execution of the current test. 

3% It is used to inform the operator that the current test has been 
3% aborted. 

3% 

;* INPUTS: ERRMSG - Contains the name of the current test. 

3% ERRNBR - Contains the correct error number. 

3% The remainder of the ERRTBL is correctly initialised. 

3% 

3# OUTPUTS: Messages are reported to the operator. 


7% 

3# CALLING SEQUENCE: JSR PC, TSABRT 
3* 

3* COMMENTS: 


3% 
:* SUBORDINATE ROUTINES CALLED: ER1603. 
So - BER EEEE OE EEEE EEE EEEEEEEEEEEEEEEEEEEAEEEEEEEEEEEEEEEEOEESEEEEREEEEEEEREEE 


TSABRT:: 


003774 


117 2$: 
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SEQ 0095 


GLOBAL SUBROUTINE - TSABRT - 


SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV #2$,R1 sPASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 
MOV #ER1603,ERRBLK ;SET-UP THE ERROR REPORTING ROUTINE. 
ERROR ; >>>>> ERROR <<<<<, 


TRAP CSERROR 
BR 60$ 3 
-ASCIZ / NON-RELATED TEST ERROR FOUND DURING TEST EXECUTION/ 


PASS sRESTORE GPRS. 
- . JSR PC,@(SP)+ sRETURN TO PREGOS SUSRT. 
$ P 
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GLOBAL SUBROUTINE 


3704 022570 

022570 
3705 022574 
3706 022576 
3707 022602 
3708 022606 
3709 022610 
3710 022614 
3711 022620 


3715 022622 
3716 022626 
3717 022630 
3718 022632 


3723 022634 
3724 022636 
3725 022640 
3726 022644 
3727 022646 
3728 022650 
3729 022652 


3731 022654 
022654 
022660 


3733 022662 





004537 
010500 
012701 
013702 
005202 
012703 
013704 
005005 


010477 
105712 
100001 
050105 


030100 
001402 
142712 
005204 
006301 
005303 
001363 


010566 
004736 


000207 


003776 


000001 
002260 


000010 
002330 


157416 


000200 


000014 


- TXOSBL - 


-SBTTL GLOBAL SUBROUTINE - TXDSBL - 

zoe SERREAESEREEEEEEAAEAEAEEEREESAAEAEEEAAAEEREREREAREEEEEEEEEEEEEEEEEDEEDEEEEE 
3% - Transmitter Disable - 

7* This subroutine is used to disable transmission on selected lines by, 
3* clearing the associated TX.ENABLE bit on the DUT. 

3% 

;* INPUTS: RS - Bit's set correspond to lines on which to clear TX.ENABLE. 
ae CSRA - Contains the address of the DUT CSR. 

34 IESTAT - Contains the state of TXIE and RXIE bits in the CSR. 
3% NUMLNS - Equated to be the maximum number of lines aveilabie. 
3% TXAD2A - Contains the address of the TBUFFAD2 register. 

3% 

3# OUTPUTS: RS - Bit's set indicate the initial states of all TX.ENBLE bits. 
;* TBUFFAD2 - The state of the TX.ENBLE bit may be altered. 

;* The contents of the IND.ADD.REG field in the CSR are destroyed. 
3* 

3* CALLING SEQUENCE: JSR PC, TXDSBL 

3% 

3* COMMENTS: 


;* SUBORDINATE ROUTINES CALLED: NONE. 
F-- SERRRERREEEEAE EERE EERE SEER EAE EDERES ODED ODES SEEDED ES OE OEE OE EERE EEE EEEEEEE 


TXDSBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV RS,RO sCOPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 
MOV #BITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 
MOV TXAD2A ,R2 ;GET THE ADDRESS OF THE TBUFFAD2 REGISTER. 
INC R2 sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
MOV @NUMLNS , R3 sGET MAXIMUM LINE NUMBER PLUS ONE. 
MOV IESTAT ,R4 sGET THE STATES OF THE INT ENABLE BITS. 
CLR RS sLOG POSSIBLE TX DISABLED ON ALL LINES. 
3* 
; Select every line in turn, and log the state of each TX.ENABLE bit. 
3° 
2s: MOV R4,ACSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
TSTB = (CR2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
BPL 4$ sSKIP NEXT INSTRUCTION IF TX.ENABLE CLEAR. 
BIS R1,R5 sLOG TX ENABLE BIT SET FOR SELECTED LINE. 
3¢ 
; Clear TX.ENBLE on lines that have a corresponding bit set in the tx disable 
+ line bit map. 
4$: BIT R1,RO sCHECK STATE OF DISABLE LINE BIT MAP. 
BEQ 6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
BICB #BIT7,(R2) sCLEAR TX.ENABLE BIT ON SELECTED LINE. 
6$ INC R4 sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
ASL R1 sSHIFT BIT MAP FOR NEXT LINE. 
DEC R3 ;DECREMENT LINE NUMBER. 
BNE 2s ;LOOP TO CHECK NEXT LINE. 
60$: PASS R5 sRESTORE GPRS,EXCEPT 
MOV RS,RSSLOTC SP) ;PUT RS IN STACK SLOT. 
JSR PC,@C(SP)+ sRETURN TO PREGOS SUBRT. 
ore ™ sRS - PREVIOUS STATES OF ALL TX.ENABLE BITS. 
T 





SEQ 0096 
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GLOBAL SUBROUTINE 


rene 


3735 
3736 
3737 
3738 
3739 
3740 
3741 
3742 
3743 
3744 


022714 


022716 
022722 
022724 
022726 


022730 
022732 
022734 
022740 
022742 
022744 
022746 


022750 


022750 
022754 


022756 


100401 
050105 


030100 
001402 
152712 
005204 
006301 
005303 
001363 


010566 
004736 


000207 


003776 


000001 
002260 


000010 
002330 


157322 


000200 


000014 





- TXENBL - 


-SBTTL GLOBAL SUBROUTINE - TXENBL - 

FO + REORAEEEEEEREREEESEREEEEEE EERE EEEEEEEEESEEEEEEES ODE ODEO OEEDEEEDEEEEED EES 
34 - Transmitter Enable - 

3% This subroutine is used to enable transmission on selected lines by 

3* setting the associated TX.ENABLE bit on the DUT. 

7* 

3;* INPUTS: RS - Bit's set correspond to lines on which to set TX.ENABLE. 
pk CSRA - Contains the address of the DUT CSR. 

3% IESTAT - Contains the state of TXIE and RXIE bits in the CSR. 
3% NUMLNS - Equated to be the maximum number of lines available. 
3% TXAD2A - Contains the address of the TBUFFAD2 register. 

4* 

:* OUTPUTS: RS - Bit’s set indicate previously disabled lines. 

3% TBUFFAD2 - The state of the TX.ENBLE bit may be altered. 

3% The contents of the IND.ADD.REG field in the CSR are destroyed. 
3* 

3* CALLING SEQUENCE: JSR PC, TXENBL 

3* 

:;* COMMENTS: 

3% 


s# SUBORDINATE ROUTINES CALLED: NONE. 
 elialllachaahadachathehcedetthcaateeeh neh Ltt tthe LL LLL Ltt ttt TTT TT TT TTT TTT TTT tt" 


TXENBL:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
MOV RS,RO sCOPY BIT MAP OF LINES TO ENABLE. 
MOV @BITO,R1 sINITIALIZE THE SELECTED LINE BIT MASK. 
MOV TXAD2A ,R2 sGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 
INC R2 sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
MOV @NUMLNS , R3 sGET MAXIMUM LINE NUMBER. 
MOV IESTAT ,R4 sGET THE STATES OF THE INT ENABLE BITS. 
CLR RS sCLEAR TX.ENABLE BIT LOG OF DISABLED LINES. 


3¢ 
; Select every line in turn,and log any TX.ENBLE bit that is clear. 


2$: MOV R4,8CSRA sWRITE TO DUT CSR TO SELECT LINE REGISTERS. 
TSTB = (R2) sCHECK STATE OF TX.ENABLE BIT ON SELECTED LINE. 
BMI 4s sSKIP NEXT INSTRUCTION IF TX.ENABLE SET. 
BIS R1,R5 sLOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 
3 
; Set TX.ENBLE on lines that have a corresponding bit set in the tx enable 
; Line bit map. 
4$: BIT R1,RO sCHECK STATE OF TX.ENABLE LINE BIT MAP. 
BEQ 6$ sBRANCH IF THIS LINE TO REMAIN UNALTERED. 
BISB #BIT7,(R2) sENABLE TRANSMISSION ON SELECTED LINE. 
6$ INC RG sPREPARE TO SELECT REGISTERS FOR NEXT LINE. 
ASL R1 ;SHIFT BIT MAP FOR NEXT LINE. 
DEC R3 sDECREMENT LINE NUMBER. 
BNE 2s sLOOP TO CHECK NEXT LINE. 
60$: PASS R5 sRESTORE GPRS,EXCEPT 
MOV RS ,RSSLOTC SP) sPUT RS IN STACK SLOT. 


JSR PC ,@(SP)-+ 
sRS_- LINE BIT MAP CORRESPONDING TO THE 
ats ec ; PREVIOUS LINES THAT WERE DISABLED. 


sRETURN TO PREGOS SUBRT. 





SEQ 0097 
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SEQ 0098 
GLOBAL SUBROUTINE - TXIEO - 

3790 -SBTTL GLOBAL SUBROUTINE - TXIEO - 
3791 eM CIII Iti iiriiititiiiii iti tiii ttt titi ti titi titi T tT TTT TTT TT TTT TTT TT TTT TTT 
3792 3* - TRANSMITTER INTERRUPT DISABLE - 
La pa This routine is used to disable transmitter interrupts in the DHV11. 

3* 
3795 ;* INPUTS: NONE . 
3796 3* 
3797 3* OUTPUTS: The TX.INT.ENBL bit is cleared in the DUT CSR. 
3798 3% IESTST -contains the updated status of the TX and RX interrupt 
3799 3% enable bits. 
3800 3% 
aos 3* CALLING SEQUENCE: JSR PC, TXIEO 

3% 
3803 3 COMMENTS: The contents of the indirect address register field in 
3804 3* the DUT CSR are destroyed. 
3805 ;* 
3806 3* SUBORDINATE ROUTINES CALLED: NONE. 
3807 Fr — SRSKAKAKSKAAESSERASASAEAKASESEASAAASESEAESARSEAEASSEAEAAARALALELES SELES HARALERELESD 
3808 022760 010046 TXIEO:: MOV RO,-(SP) sSAVE CONTENTS OF RO ON THE STACK. 
3809 022762 106746 MFPS -(SP) sSAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 
3810 022764 106427 000340 MTPS #PRIO7 sIGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 
3811 022770 042737 177677 002330 BIC #177677, IESTAT ;CLEAR TX.INT.ENBL BIT IN IESTAT. 
3812 022776 013777 002330 157240 MOV IESTAT,@CSRA s;DISABLE TX INTERRUPTS. 
3813 023004 106426 MTPS (SP)+ sENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 
3814 023006 012600 MOV (SP)+,RO sRESTORE RO. 
3815 023010 600207 RTS PC 
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SEQ 0099 
GLOBAL SUBROUTINE - TXIE1 - 
3817 -SBTTL GLOBAL SUBROUTINE - TXIEL - 
3818 PERM tT Titi i titi titi itirtiti iit titittiititi tit TT TT TT TTT TTT TTT TTT TTT TTT TT TTT TTT 
3819 3% - TRANSMITTER INTERRUPT ENABLE - 
— 3% This routine is used to enable transmitter interrupts in the DHV11. 
3* 

3822 :* INPUTS: NONE . 
3823 3% 
3824 3* OUTPUTS: The TX.INT.ENBL bit is set in the DUT CSR. 
3825 3* IESTST -contains the updated status of the TX and RX interrupt 
3826 3* enable bits. 
3827 3* 
eee ;* CALLING SEQUENCE: JSR PC, TXIE1L 

9 3* 
3830 3* COMMENTS: The contents of the indirect address register field in 
3831 3* the DUT CSR are destroyed. 
3832 3* 
3833 ;* SUBORDINATE ROUTINES CALLED: NONE. 
3834 POM TIT Tir iti titi tii titi it titi titi ti ttt ttt t tT TTT TTT TTT TTT TTT TTT TTT TTT TTT TTT TT 
3835 
3836 023012 052737 040000 002330 TXIE1:: BIS #B1IT14,IESTAT ;SET TX.INT.ENBL BIT IN IESTAT. 
3837 023020 042737 137677 002330 BIC #137677,IESTAT ;CLEAR ALL BITS EXCEPT TX RX I.E BITS. 
3838 023026 013777 002330 157210 MOV IESTAT,@CSRA sDISABLE TX INTERRUPTS. 
3839 023034 000207 RTS PC 





eo 
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SEQ 0100 
GLOBAL SUBROUTINE - UNSDIV - 
3841 -SBTTL GLOBAL SUBROUTINE - UNSDIV - 
3842 BE leaden ene t toi T TTT tii Tit TTT TTT TTT TTT TTT TTT TT TTT TTT TTT Tee 
3843 ;* - Unsigned Divide Routine - 
3844 3% This subroutine is used to divide a 32 bit unsigned dividend by a 
3845 3* 16 bit unsigned divisor giving a 16 bit quotient. All numbers are 
3846 3* considered to be unsigned. A success flag is not set on return if 
pose ;* the quotient was too big to be contained in 16 bits. 
;* 
3849 3;* INPUTS: Ri - The divisor, unsigned, 16 bits. 
3850 ;* R2 - Most significant word of the dividend, unsigned, 16 bits. 
oo. 3% R3 - Least significant word of the dividend, unsigned, 16 bits. 
3* 
3853 3* OUTPUTS: Ri - Quotient, unsigned, 16 bits (177777 if overflow). 
aed 3% CARRY - Success flag, set if complete quotient fits in 16 bits. 
7* 
roe 3* CALLING SEQUENCE: JSR PC ,UNSDIV 
8 3* 
3858 3+* COMMENTS: If the divisor is 0 the quotient is returned as all ones 
aH 34 (177777) and the carry is clear regardless of the dividend. 
3* 
3861 ;# SUBORDINATE ROUTINES CALLED: None. 
3862 3-- SEEEEEEREREREEEEEEEEEE SEES OEOEEDODOEEEED OSES EEEEEEEEEEEDEEEEEERREERELERREEE 
3863 
3864 023036 UNSDIV:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
_— 023036 004537 003776 JSR RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
3* 
44 ; Check for quotient greater than 16 bits condition. 
867 to 
3868 023042 010204 MOV R2,R4 sGET MSW OF DIVIDEND FOR SUBTRACT. 
3869 023044 160104 SUB R1,R4 sSUBTRACT DIVISOR FROM MSW OF DIVIDEND. 
3870 023046 103403 BCS 2$ sIF IT DION'T GO, WE HAVE QUOTIENT < 16 BITS. 
3871 023050 012701 177777 MOV #-1,R1 sSET QUOTIENT TO ALL ONES (177777), 
di | 023054 000442 BR 60$ sEXIT WITH CARRY CLEAR. 
i+ 
odes ; Set up counters and various working GPRs. 
+ 
3876 023056 005004 2s: CLR R4 sCLEAR THE LSW OF THE DIVISOR. 
3877 023060 000241 CLC sCLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 
3878 023062 006001 ROR Ri ; DIVISOR BY 
3879 023064 006004 ROR R4 ; 2CUNSIGNED ) 
oo 023066 012700 000020 MOV #16. ,RO sSET UP INITIAL SHIFT COUNT TO 16. 
1 i¢ 
poem ; The subtract and shift loop. 
883 i 
3884 023072 010246 4$: MOV R2,-(SP) sSAVE MSWORD OF DIVIDEND. 
3885 023074 010346 MOV R3,-(SP) sSAVE LSWORD OF DIVIDEND. 
3886 023076 160403 SUB R4,R3 sLSWORD DIVIDEND - LSWORD OF DIVISOR. 
3887 023100 005602 SBC R2 sMSWORD DIVIDEND - BORROW . 
3888 023102 103402 BCS 6$ sIF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 
3889 023104 160102 SUB R1,R2 sMSWORD DIVIDEND - MSWORD OF DIVISOR. 
tty 023106 103003 BCC 8$ ;IF NO BORROW, IT WENT, CARRY IS CLEAR. 
1 3? 
3892 ; It didn't go, so we shift a 1 into the quotient Ccomplemented later). 
or ; Carry is set. 
3895 023110 012603 6¢: MOV (SP)+,R3 sRESTORE LSWORD OF DIVIDEND. 
3896 023112 012602 MOV (SP)+,R2 sRESTORE MSWORD OF DIVIDEND. 


ange 
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eae 


023114 


023116 


023120 
023122 
023124 
023126 
023130 
023132 
023134 


023136 
023140 
023142 
023144 
023146 


023150 
023152 
023154 


023156 
023160 


023162 
023162 
023166 


023170 


000401 


012626 


006105 
000241 
006001 
006004 
005300 
001357 
005105 


000241 
006103 
103402 
160403 
103403 


005205 
001001 
005305 


010501 
000261 


010166 
004736 


000207 


000004 





3 


10$ 


; complemented later). 
(SP)+,(SP)-+ 


ge 
8$: MOV 


10$: ROL 


3¢ 
; Now we eit 


CLC 
ROL 
BCS 
SUB 
BCS 


7° 

; Round up, 

12$: INC 
BNE 
DEC 

3? 

; All done, 


14s: MOV 
SEC 


60$: PASS 


RTS 


sGOTO SHIFT 1 INTO THE QUOTIENT. 


; It went, so we restore the stack and shift a 0 into quotient (will be 
Carry is clear. 


sPOP THE SAVED DIVIDEND OFF OF THE STACK. 


the result of the subtract attempt into the quotient shift reg. 


RS 


sSHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
sDIVIDE THE 

; DEVISOR BY 

;_ 2 (UNSIGNED). 

s;COUNT THIS SHIFT AND SUBTRACT. 

s;LOOP FOR ANOTHER SHIFT & SUB IF NOT DONE. 
sGET QUOTIENT FROM INVERTED QUOTIENT. 


her round up or leave quotient alone. 


R3 
12$ 
R4,R3 
14$ 


extra subtract went. 


RS 
14$ 
R5 


sCLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
sMULTIPLY LSWORD OF DIVIDEND BY 2, MSWORD IS 0. 
sIF CARRY FROM SHIFT, ROUND UP. 

sSUBTRACT DIVISOR FROM DIVIDEND. 

;IF BORROW, DON'T ROUND UP. 


sINCREMENT THE QUOTIENT BY ONE. 
sIF NO OVERFLOW, WE LEAVE THE ROUND UP. 
;DON‘T LET ROUNDING CAUSE OVERFLOW. 


pass quotient and exit. 


RS,R1 


Ri 


PC 


MOV 
JSR 


R1,R1ISLOTC SP) 
PC ,@(SP)-+ 


sPASS QUOTIENT BACK IN Ri. 
sINDICATE NO OVERFLOW. 


sRESTORE GPRS, LEAVE THE FOLLOWING INTACT: 
sPUT R1 IN STACK SLOT. 


sR1 - 16 BIT, UNSIGNED QUOTIENT, 
sCARRY - SET INDICATES NO OVERFLOW (SUCCESS). 


sRETURN TO PREGOS SUBRT. 






SEQ 0101 
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SEQ 0102 


3937 -SBTTL GLOBAL SUBROUTINE - WAIBIC - 

3938 jee S60 066606 66006600066 060606 060006066600 06 00000060006060060000606000660006200600088 

3939 ;* - Wait For Bit Clear Routine - 

3940 ;* This subroutine waits for the specified bit to become clear. If the 

3941 ;* specified bit goes to e clear state within the specified time-out 

3942 ;* period a success indication is returned by this routine. 

3943 ;¢ The lest value which is read looking for the condition is returned to 

ben: i* allow the use of this routine to look for destructive read conditions. 
;* 

3946 ;* INPUTS: Ri - Time-out velue and bit number indication: 

3947 ;* Bits 15 thru 12 - Number of bit to test (range 0 thru 15). 

3948 34 Bits 11 thru 0 - Time-out velue in milli-seconds (4095 max). 

3949 i* R2 - Address of word containing the bit to test. 

3950 ;* MSLCNT. 

3951 34 

3952 3* OUTPUTS: R2 - The lest word which was read to check for the condition. 

sy ;4 CARRY - Success flag (CARRY set if bit clr before time-out). 
te 

3955 3# CALLING SEQUENCE: MOV #130040,R1 sPASS BIT 11 (13 OCTAL) AND 

3956 i* ; 32 (40 OCTAL) MS DELAY. 

3957 ;* MOV @LABEL ,R2 sTEST BIT IN WORD AT “LABEL”. 

roe i* JSR PC ,WAIBIC sWAIT 32 MS FOR BIT 11 TO CLR. 
s 

3960 ;* COMMENTS 

3961 34 

3962 i SUBORDINATE ROUTINES CALLED: MSLGET. 

3963 i-- $660 66660666006066066 0666 066006000660006000660006000000060600006060660000000600608 

3964 

3965 023172 WAIBIC:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 

023172 004537 003776 JSR RS ,PREGOS s:CALL REGISTER SAVE SUBRT. 

3966 023176 010204 MOV R2,R4 ;SET UP THE ADDRESS PARAMETER FOR MSLGET. 

3967 023200 010102 MOV R1,R2 

3968 023202 042701 170000 BIC #170000,R1 sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 

3969 023206 042702 007777 BIC €7777,R2 sSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 

3970 023212 000302 SWAB R2 sPUT LINE NUMBER FIELD IN LSBYTE. 

3971 023214 006202 ASR R2 sSHIFT THE LINE NUMBER FIELD INTO THE PROPER 

3972 023216 006202 ASR Re s POSITION TO USE IT AS A WORD TABLE OFFSET 

3973 023220 006202 ASR R2 ; FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 

3974 023222 016202 002410 MOV BITTBL(R2),R2 sGET BIT MAP OF LINE TO TEST FROM TABLE. 

3975 023226 005003 CLR R3 sINDICATE THAT THE BIT SHOULD BE CLR. 


3976 023230 004737 020340 JSR PC ,MSLGET sWAIT FOR THE BIT TO BE CLR WITHIN TIME-OUT. 
3977 ;_ CARRY IS CORRECT UPON MSLGET RETURN. 
3978 023234 010002 MOV RO,R2 sPASS LAST VALUE READ AS OUTPUT PARAMETER. 
3979 023236 60$: PASS R2 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
023236 010266 000006 MOV R2 ,R2SLOT( SP ) sPUT R2 IN STACK SLOT. 
023242 004736 JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 
3980 s R2 - LAST VALUE READ LOOKING FOR CONDITION. 
3981 023244 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF BIT FOUND CLR). 


[a 
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SEQ 0103 
GLOBAL SUBROUTINE - WAIBIS - 
3983 -SBTTL GLOBAL SUBROUTINE - WAIBIS - 
3984 3%% £6£66666666 6066 666666 606006 6606066066666 66 6060660606664 26606060066 066060606066600606860686 
3985 ;* - Weit For Bit Set Routine - 
3986 ;4 This subroutine waits for the specified bit to become set. If the 
3987 pe specified bit goes to e set state within the specified time-out 
3988 ;* period e success indication is returned by this routine. 
3989 i# The lest velue which is reed looking for the condition is returned to 
sa i* allow the use of this routine to look for destructive reed conditions. 
1 ;@ 
3992 3;@ INPUTS: Ri - Time-out velue end bit number indicetion: 
3993 :a Bits 15 thru 12 - Number of bit to test (renge 0 thru 15). 
3994 3% Bits 11 thru 0 - Time-out velue in milli-seconds (4095 mex). 
3995 34 R2 - Address of word containing the bit to test. 
3996 34 MSLCNT. 
3997 :* 
3998 3@ OUTPUTS: R2 - The lest word which wes read to check for the condition. 
ote ;* CARRY - Success flag (CARRY set if bit set before time-out). 
4 3* 
4001 3# CALLING SEQUENCE: MOV #130040,R1 sPASS BIT 11 (13 OCTAL) AND 
4002 ;* ; 32 (40 OCTAL) MS DELAY. 
4003 i@ MOV @LABEL ,R2 ;TEST BIT IN WORD AT “LABEL”. 
peee ;¢ JSR PC ,WAIBIS ;WAIT 32 MS FOR BIT 11 TO SET. 
400 i* 
4006 ;@ COMMENTS: 
4007 i* 
4008 3# SUBORDINATE ROUTINES CALLED: MSLGET. 
4009 f-- 0600060606 66 606000000000 0006060600 00006000000000000006000000000000000000000 
4010 
4011 023246 WAIBIS:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
023246 004537 003776 JSR »PREGOS s;CALL REGISTER SAVE SUBRT. 
4012 023252 010204 MOV R2,R4 sSET UP THE ADDRESS PARAMETER FOR MSLGET. 
4013 023254 010102 MOV R1,R2 
4014 023256 042701 170000 BIC #170000,R1 sSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
4015 023262 042702 007777 BIC 07777,R2 sSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
4016 023266 000302 SWAB R2 ;PUT LINE NUMBER FIELD IN LSBYTE. 
4017 023270 006202 ASR R2 sSHIFT THE LINE NUMBER FIELD INTO THE PROPER 
4018 023272 006202 ASR R2 ; POSITION TO USE IT AS A WORD TABLE OFFSET 
4019 023274 006202 ASR R2 ; FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
4020 023276 016202 002410 MOV BITTBLC(R2),R2 sGET BIT MAP OF LINE TO TEST FROM TABLE. 
4021 023302 010203 MOV R2,R3 sINDICATE THAT THE BIT SHOULD BE SET. 
4022 023304 004737 020340 JSR PC ,MSLGET sWAIT FOR THE BIT TO BE SET WITHIN TIME-OUT. 
4023 ; CARRY IS CORRECT UPON MSLGET RETURN. 
4024 023310 010002 MOV RO,R2 sPASS LAST VALUE READ AS OUTPUT PARAMETER. 
4025 023312 60% PASS R2 sRESTORE GPRS, EXCEPT THE FOLLOWING: 
023312 010266 000006 MOV R2,R2SLOTC SP) sPUT R2 IN STACK SLOT. 
023316 004736 JSR PC ,@C(SP)>+ sRETURN TO PREGOS SUBRT. 
4026 3; R2 - LAST VALUE READ LOOKING FOR CONDITION. 
4027 023320 000207 RTS PC s CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 


cs 





4069 


4070 023322 
023322 

4071 

4072 

4073 

4074 023326 





004537 


005005 


010206 
010577 
006305 


036537 
001451 
012701 





003776 


-SBTTL GLOBAL SUBROUTINE 
foo BSERSERESEEEESEEEEEREOEESEEEESEEEEREEEEDEREEEENES EERDEREDEEEEEDEEEEEEEEEEDE 


ph - Write Date Pattern to Device Registers - 

3% This routine writes eae roteted dete pattern to each of the 6 device 

3% registers of each active line of the device under test. 

3% The date pattern is rotated once efter each write to eae device register 
3% on e particuler line. The starting dete pattern for each line 
pe is rotated once efter writin = the registers on e perticuler 
pe line. This leads to the follow dete pettern: 

:% Line 0, register 0 - shit ed 0 bit positions 

34 Line 0, register 1 - shifted 1 bit position 

3s eee 

3% Line 1, register 0 - shifted 1 bit position 

3% Line 2, register 1 - shifted 2 bit positions 

3* eee 

3% Any bite fields in the device registers that cennot be altered 

3% ere masked out of the dete pattern before it is written. 

34 This routine will use either MOV, MOVB, BIS, BISB, BIC, or BICB 

3% instructions. The upper or lower byte can be specified for writing. 
3@ INPUTS R2 - Used to pass in the dete pattern to be roteted € written. 
3% R3 - Byte indicetor (- => lo byte, + => hi byte, 0 my both). 

34 R4 - Operation type indicetor (- => BIC, + => BIS, 0 => MOV). 
3% ACTLNS - Bit mep of the ective lines on the device under test. 
pe CSRA - Contains the CSR eddress of the Device under test. 

3% DRAORT - Base eddress of device register eddress table. 

3% LPRO - Equated ~. LPR reg offset from device CSR address. 

3% NUMLNS - Number of lines on the device under test. 

:o TXBFCO - Equated to TBUFFCT reg offset from device CSR eddress. 
16 UNBTTB - Base address of the unused bit teble. 

3% 


WOPDR:: SAVE 
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Device registers on ell ective device lines ere modified. 
3% 
3@ CALLING SEQUENCE: 


3% 
3 COMMENTS: 
3% 


72 
3@ SUBORDINATE ROUTINES CALLED: ROLDAP. 
F-86866 6866 0606 06 66 EE SE SE SE SESESEESSESSEESEEEEEEESESESSOASSHESEOESEEEHEEEEEE 


CSR is cleered except for 





JSR PC ,WOPOR 
me routine does not write any dete to the TX.CHAR registers. 





the IND.ADR.REG field. 








sSAVE CONTENTS OF GPRS RO THRU RS. 


JSR RS ,PREGOS 


sCALL REGISTER SAVE SUBRT. 


s¢ 
; Set up outer loop which writes the date pettern to each line's registers 
sCLEAR LINE COUNTER TO SELECT LINE 0. 


ge 
CLR 


3? 


; The outer loop follows. 


Eech pese 


thie leep writes dete to ell of 


3; the device registers for e perticuler line if it is ective. 


sSAVE THE OUTER LOOP DATA PATTERN. 
sSET CSR IMD.AOR.REG FIELD TO THIS LINE. 


i- 
2s: MOV 


RS 
BITTBLCRS).ACTLMS 


@LPRO,R1 


TURN LIME NUMBER INTO A WORD OFFSET. 


sLINE ACTIVE? 
sYES, INITIALIZE THE REGISTER OFFSET. 


NO, SKIP THIS LINE. 
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-— 


023514 


002264 
002244 
000010 


000010 


000012 


000012 


021570 
000002 
000016 


021570 


000010 





- WOPOR - 


63: 


8$: 
10$: 


12s: 


14$: 
16$: 


3° 
; Back into the 


208: 


60$: 


The inner loop follows. 





device register. 


3¢ 


R2,RO 


UNBTTBCR1),RO 
DRADRT(R1),R3 


R3SLOT(SP) 
6% 

R3 

RO 
R3SLOTC(SP) 
12$ 


Each pass through this loop writes dete to a 


sCLEAR BIT FIELDS FOR UNUSED REGISTER BITS. 
sGET THE ADDRESS OF THE DEVICE REGISTER. 

sCHECK THE OPERAND TYPE INDICATOR. 

sHIGH BYTE? NO, SKIP HIGH BYTE ADDRESS SET UP. 
sYES, SET THE REG ADDRESS TO THE HIGH BYTE. 
sMOVE HIGH BYTE DATA INTO THE LOW BYTE. 

sCHECK THE OPERAND TYPE INDICATOR. 

sWORD ACCESS? YES, GO PERFORM WORD ACCESS. 


sPerform byte access to the specified byte of the specified register. 


a0 
TST 
BMI 
BEQ 
BISB 
BR 
BICB 
BR 
MOVB 
BR 


3° 


R4SLOT(SP) 
8s 

10$ 
RO,CR3) 
18% 
RO,CR3) 
18$ 
RO,CR3) 
18$ 


sNO, CHECK THE ACCESS TYPE INDICATOR. 

sUSE BIC? YES, GO PERFORM BICB INSTRUCTION. 
sUSE MOV? YES, GO PERFORM MOVB INSTRUCTION. 
sNEITHER. PERFORM BISB ACCESS TO REGISTER. 


sPERFORM BICB ACCESS TO REGISTER. 
sPERFORM MOVB ACCESS TO REGISTER. 


Perform word access to the specified register. 


JSR 
ADD 

CMP 

BLE 


R4SLOT(SP) 
148 


18% 
RO,CR3) 


PC ,ROLDAP 
#2,R1 
R1,@TXBFCO 
as 


outer loop. Now set up for next line. 


R4 ,R2 
PC ,ROLDAP 
RS 


RS 
RS, @NUMLNS 
2s 


JSR 
PC 


sCHECK THE ACCESS TYPE INDICATOR. 

sUSE BIC? YES, GO PERFORM BIC INSTRUCTION. 
sUSE MOV? YES, GO PERFORM MOV INSTRUCTION. 
sNEITHER. PERFORM BIS ACCESS [O REGISTER. 


sPERFORM BIC ACCESS TO REGISTER. 
sPERFORM MOV ACCESS TO REGISTER. 


; Prepare the data pattern and offset for the next register on this line. 
183: 


sROTATE DATA PATTERN LEFT, NOT THROUGH CARRY. 
s INCREMENT OFFSET FOR NEXT REGISTER. 

sCOMPARE REG OFFSET WITH OFFSET OF LAST REG. 
sLOOP IF NOT ALL REG DONE FOR THIS LINE. 


Loop if not done. 


sSET UP TO ROTATE THE DATA PATTERN. 

sROTATE THE DATA PATTERN. 

sCONVERT BACK TO LINE NUMBER FROM WORD OFFSET. 
sCOUNT THIS LINE. 

sCOMPARE LINE COUNT WITH NUMBER OF LINES. 
sLOOP IF SOME LINES NOT DONE. 


sRESTORE GPRS. 


PC,@(SP)-+ sRETURN TO PREGOS SUBRT. 






SEQ 0105 
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4141 
4142 
4143 
4144 
4145 
4146 
4147 


-— 


023516 
023516 


023522 
023526 
023530 
023532 


023536 


023542 
023542 
023544 


004537 


013701 
010002 
010503 
012704 


004737 


004736 
000207 


003776 


002254 


177777 


017630 





















SEQ 0106 
- WTWLNC - 
-SBTTL GLOBAL SUBROUTINE - WTWLNC - 
2% * £08060606060 66606606066 6666 6660606066460 66 66666666 464600666660660606664660606666646646464646466 
:@ - Line Control Register Setup Routine - 
3¢ This subroutine is used to set the Device Under Test (DUT) Line 
i Control Registers (LNCTRL) to the specified state. Only the LNCTRLS 
34 for the specified lines are altered. 
34 
3@ INPUTS: RO - New line perameters. 
34 RS - Bit map of lines to be altered. 
34 CSRA - Contains address of the DUT CSR. 
3@ IESTAT - Contains the current state of the TX and RX interrupt 
:4 enable bits in the CSR. 
34 LNCTRA - Contains address of the DUT LNCTRL registers. 
34 
:@ OUTPUTS: LNCTRL - Specified DUT Line Control Registers ere altered. 
3% 
3@ CALLING SEQUENCE: JSR PC ,WTWLNC 
34 
:¢@ COMMENTS: 
34 
3@ SUBORDINATE ROUTINES CALLED: ALTFLDO. 
B- > £00000 66 46460606606 0646060 66 06660 066666060646 006600060660 0666466466046606606466064640464646606044606648 
WTWLNC:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
: Set up the parameters for the call to ALTFLD. 
- MOV LNCTRA,R1 ;SET UP THE REGISTER ADDRESS PARAMETER. 
MOV RO,R2 ;SET UP THE DESIRED REGISTER CONTENTS. 
MOV RS .R3 ;SET UP THE BIT MAP OF LINES TO ALTER. 
MOV @-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 
; Cell the subroutine which alters the register contents. 
, JSR PC,ALTFLD sALTER THE REGISTER CONTENTS. 
60$: PASS s;RESTORE GPRS. 
JSR PC,aCSP)+ ;RETURN TO PREGOS SUBRT. 


RTS PC 
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- WTWLNS - 





GLOBAL SUBROUTINE 


4180 


023546 
023546 


023552 
023556 


023562 


023566 
023566 
023570 


004537 


012703 
012704 


004737 


004736 
000207 


003776 


000377 
177777 


017630 





-SBTTL GLOBAL SUBROUTINE - WTWLNS - 

FRSSSASSASSS SAAS SK EASSAAAKAKSEAESEASSSEKASASSEESESKESEEEEEKEEEEAEAEAEEESEREREDEEEESE 
;¢ - Write Word to ell Lines routine - 

34 This subroutine writes a specified word to the specified DHV device 
34 register for each of the DHV lines. It could be used to clear all 
34 of the LNCTRL registers or to initialize all of the LPR registers to 
34 the same peremeters. 

3* 

3@ INPUTS: R1 - Address of the specified registers. 

34 R2 - Word to write into the specified registers. 

34 IESTAT - Saved states of the TX.IE and RX.IE bits. 

38 MAPLNS - Equated to bit map of lines on device (8 for DHV11). 
34 CSRA. 

3% 

;@ OUTPUTS: DEVICE REGISTERS - Specified registers giver new value. 

34 CSR IND.ADR.REG field - Destroyed. 

34 CSR Interrupt Enable bits - Set to states in IESTAT. 

3% 

;# CALLING SEQUENCE: JSR PC ,WTWLNS 

3* 

3;# COMMENTS: Note that the specified registers for all lines are altered 
34 by this routine. This routine should NOT be used to alter 
34 the states of partial register fields or to alter a register 
34 for fewer than all of the lines. 

3% The specified registers are read before being written. 


;* 
;# SUBROUTINES CALLED: ALTFLD. 
FSSAHAEREKESEEEASEHSESESSEASEASEEASEAEAAAEAESEHARASEAKEKAAEAEREEALEASALALE SALAS 


WTWLNS:: SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
3¢ 
; Set up the bit map of lines to change and mask of bits to alter parameters. 


MOV @MAPLNS,R3 ;GET THE BIT MAP OF LINES TO CHANGE. 
MOV #-1,R4 sINDICATE ALL 16 BITS TO BE CHANGED. 
3? 
; Call the subroutine to write the specified registers. 
F JSR PC,ALTFLD ;CHANGE THE REGISTERS. 
60$: PASS s;RESTORE GPRS. 
- - JSR PC,A8(SP)+ ;RETURN TO PREGOS SUBRT. 
S 






SEQ 0107 
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SEQ 0108 
GLOBAL SUBROUTINE - WTWLPR - 
4223 -SBTTL GLOBAL SUBROUTINE - WTWLPR - 
4224 5 ¢¢ SHEER SAREREEAREAESSEAAEREEEEAEEEEEE REDE EEEDED DD ODOE DEED OEEEEDEDEEDEEEEE EEE 
4225 34 - Line Parameter Register Setup Routine - 
4226 ;* This subroutine is used to set the Device Under Test (DUT) Line 
4227 3% Parameter Registers (LPR) to the specified state. Only the LPRs for 
4228 34 the specified lines are altered. 
4229 3* 
4230 3* INPUTS: RO - New line parameters. 
4231 3% RS - Bit map of lines to be altered. 
4232 3* CSRA - Contains address of the DUT CSR. 
4233 3% IESTAT - Contains the current state of the TX and RX interrupt 
4234 3* enable bits in the CSR. 
reo 3% LPRA - Contains address of the DUT LPR. 
4236 3% 
anes 3* OUTPUTS: LPR - Specified DUT Line Paramter Registers are altered. 
4238 3% 
4239 3# CALLING SEQUENCE: JSR PC ,WTWLPR 
4240 3* 
4241 3* COMMENTS: 
4242 3* 
4243 3* SUBORDINATE ROUTINES CALLED: ALTFLD. 
4244 eben bene TTT TT Ti ttt TTT TT TTT T TTT TTT Te TT TTT TTT Te eee Tee 
4245 
4246 023572 WTWLPR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
_— 023572 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
24 40 
4248 ; Set up the parameters for the call to ALTFLD. 
8249 he 
4250 023576 013701 002250 MOV LPRA,R1 sSET UP THE REGISTER ADDRESS PARAMETER. 
4251 023602 010002 MOV RO,R2 sSET UP THE DESIRED REGISTER CONTENTS. 
4252 023604 010503 MOV RS,R3 ;SET UP THE BIT MAP OF LINES TO ALTER. 
saat 023606 012704 177777 MOV #-1,R4 sSELECT ALL REGISTER BITS TO BE ALTERED. 
4254 3? 
= ; Call the subroutine which alters the register contents. 
4256 '= 
4257 023612 004737 017630 JSR PC,ALTFLD sALTER THE REGISTER CONTENTS. 
4258 
4259 023616 60$: PASS s;RESTORE GPRS. 
023616 004736 JSR PC,@(SP)+ ;RETURN TO PREGOS SUBRT. 
4260 023620 000207 RTS PC 


— 
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SEQ 0109 

INTERRUPT SERVICE ROUTINE - CACHRX - 

4262 -SBTTL INTERRUPT SERVICE ROUTINE - CACHRX - 

4263 3e¢ RECEEAEEREEAEAEEEREASEAEEEAERASEAEEAEARAAAERAEEAREARAREARAEE ER EREREREEEESES 

4264 3* - Catch Receiver interrupt. 

4265 3% This routine is used in several tests,to log a count of the 

an? 3% number of receiver interupts that occur. 

4 3% 

4268 :* INPUTS: CSRA - Contains the address of the CSR. 

4269 3% RXINTC - Holds the count of the number of RX interrupts 

4270 3* that occurred. 

4271 3% 

pre | :# OUTPUTS: RXINTC - Contains the updated interrupt count. 

42 3* 

4274 3% 

4275 3# CALLING SEQUENCE: Put the address of the label CACHRX in the vector 

4276 34 location. 

4277 7* 

4278 :* COMMENTS: 

4279 3% 

4280 ;* SUBORDINATE ROUTINES CALLED: none 

4281 i-- REERREREEREREEEEEEEAEREEEREAEEEARESEREEEREAEERESEREAEAAEEREEAEEAEEARERAEEERS 

4282 

4283 023622 CACHRX: : SAVE ;SAVE CONTENTS OF GPRS RO THRU RS. 

023622 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 

4284 023626 013701 002334 MOV RXINTC,R1 sGET THE RECEIVER INTERRUPT COUNT 

4285 023632 005201 INC R1 sINCREMENT THE COUNT 

4286 023634 102001 BVC 2s sBRANCH IF NO OVERFLOW OCCURRED 

4287 023636 005301 DEC R1 sRESET THE COUNT TO 177777 

4288 023640 010137 002334 2s: MOV R1,RXINTC sSAVE NEW COUNT VALUE 

4289 023644 60$: PASS sRESTORE GPRS. 

023644 004736 JSR PC ,a(SP)+ ;RETURN TO PREGOS SUBRT. 
4290 023646 000002 RTI 


— 
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SEQ 0110 
INTERRUPT SERVICE ROUTINE - CACHTX - 
4292 -SBTTL INTERRUPT SERVICE ROUTINE - CACHTX - 
4293 FO + SHERARREEEAREREREREREREREEEEEE SARE EEEEEE DEES EEEE ODED OD OEODEE ODEO EE EEEEEEEES 
8294 3* - Catch Transmiter interrupt. 
4295 3e This routine is used in several tests,to log a count of the 
rete 3% number of transmission interrupts that occur. 
;* 
4298 3;* INPUTS: CSRA - Contains the address of the CSR. 
4299 3% TXINTC - Holds the count of the number of TX interrupts 
4300 3% that occurred. 
4301 3* 
pee | 3* OUTPUTS: TXINTC - Contains the updated interrupt count. 
3% 
4304 3% 
4305 3* CALLING SEQUENCE: Put the address of the label CACHTX in the vector 
4306 3% location. 
4307 5% 
4308 3* COMMENTS: 
4309 3* 
4310 ;* SUBORDINATE ROUTINES CALLED: none 
4311 b-- SRRRREAEEEEAEESE EERE EE EAEEAEEA EERE DEEDES EEE ED OE OE ES HOODOO OE EREEEEEEEE EE EEE 
4312 
4313 023650 CACHTX: : SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
023650 004537 003776 JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
4314 023654 013701 002340 MOV TXINIC,R1 sGET THE TRANSMISSION INTERRUPT COUNT 
4315 023660 005201 INC Ri sINCREMENT THE COUNT 
4316 023662 102001 ' BvC 2s sBRANCH IF NO OVERFLOW OCCURRED 
4317 023664 005301 DEC Ri sRESET THE COUNT TO 177777 
4318 023666 010137 002340 2s: MOV R1,TXINTC sSAVE NEW COUNT VALUE 
4319 023672 60$: PASS sRESTORE GPRS. 
023672 004736 JSR PC,A(SP)+ sRETURN TO PREGOS SUBRT. 
4320 023674 000002 RTI 





eo 
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INTERRUPT SERVICE ROUTINE 


4345 023676 
4346 023702 
4347 023704 
4348 023710 
4349 023714 
4350 023716 
4351 023722 
4352 023726 
4353 023730 
4354 023736 
4355 023740 

023740 
4356 023742 
4357 023744 


— 





005737 
001402 
005337 
005737 
001402 
005337 
005337 
001006 
013737 
010046 


104422 
012600 
000002 





002364 


002364 
002366 


002366 
002370 


002372 002370 


- CLKINT - 


-SBTTL INTERRUPT SERVICE ROUTINE - CLKINT - 

PERM TTT iti iii ti titi titi iit ii titi tit it TTT ti ttt TT TTT TTT TTT TT TTT TTT TTT TTT TTT TTT 
34 This routine is executed CLKHRZ times per second. It decrements the 
3% two timer counters down to zero. 

3* 

3* INPUTS: TIMER1 - Timer counter #1. 

3% TIMER2 - Timer counter #2. 

3% TIMERS - Timer counter for call of BREAK macro. 

3% 

;* OUTPUTS: The 2 timer counters are decremented if they are not zero. 

3* 

3# CALLING SEQUENCE: Put @CLKINT in the clock interrupt vector slot. 

3% Put the desired time period (seconds times CLKHRZ) in 
34 either TIMER1 or TIMER2 and poll the respective timer 
;* counter to detect its going to 0 on time-out. 

3* 

;* COMMENTS: The 2 counters will not wraparound but will stop at 0. This 
3% allows the detection of a time-out any time after the time-out 
3% has occurred until the timer counter is set to another value. 
3% 


;* SUBORDINATE ROUTINES CALLED: None. 
b-- SERRRERAAESAEREEEESESEEEEEEEEEEEEEEEES EE EEEE ES OE OE ODES ESOS EEE EE EREEEEEE EEE 





CLKINT:: TST TIMER1 sCHECK FOR TIMER1 AT ZERO. 
BEQ 2$ sBRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 
DEC TIMER1 sDECREMENT TIME COUNT. 
2s: TST TIMER2 sCHECK FOR TIMER2 AT ZERO. 
BEQ 4$ sBRANCH TO LEAVE IT ALONE IF IT’S ALREADY ZERO. 
DEC TIMER2 sDECREMENT TIME COUNT. 
4$: DEC TIKER3 sDECREMENT THE BREAK COUNT. 
BNE 60$ sEXIT IF NOT TIME TO CALL BREAK. 
MOV BCOUNT, TIMERS ;SET UP TIME TILL NEXT BREAK. 
MOV RO,-(SP) sSAVE CONTENTS OF RO FROM BREAK MACRO. 
BREAK sCHECK FOR OPERATOR CONTROL/C. 
TRAP C$BRK 
MOV (SP)+,RO sRESTORE CONTENTS OF RO. 
60$: RTI 






SEQ 0111 
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4385 023746 

023746 
4386 023752 
4387 023756 
4388 023762 
4389 023764 
4390 023766 
4391 023772 
4392 023776 
4393 024002 
4394 024010 
4395 024012 


004537 
017700 
013701 
005201 
001402 
010137 
013701 
052701 
032737 
001402 
052701 


4402 024016 
4403 024024 
4404 024026 
4405 024032 

024032 
4406 024034 


023737 
003002 
010137 


004736 
000002 


pat 








003776 
156270 
002334 


002334 
002336 
000001 
000001 


040000 


002342 


002334 000010 
002336 


- RXBRRT - 
-SBTTL INTERUPT SERVICE ROUTINE 


- RXBRRT - 


$O> SRREEEEEEEEEEEEESEEEEEEEEEEEEEEE DEES OD EDEEEE ES EEEE EE OEEEEDEEEEEEEEEEEEEE EEE 
- BR Level Test Receive Interrupt Service Routine - 
This service routine handles Receive Interrupts during the Interrupt 


BR Level Test. 


This routine counts the interrupt and sets a flag 
to indicate that the interrupt has occurred. 
flag which indicates that a TX interrupt has occurred. 


It also checks the 
If the TX 


interrupt flag is set, this routine sets an interrupt order error 
flag indicating that a transmit interrupt was serviced before a 
simultaneous receive interrupt. 


;* 
;* INPUTS: 


7* 


3* 
3* 


;* 
3* CALLING SEQUENCE: 


3* 


;* 
3* OUTPUTS: 


3* 
3* COMMENTS: 


RXBRRT:: 


2s: 


3¢ 


: 
3 
3 
4s: 


60$: 


SAVE 


RXINTC - Holds the count of the number of RX interupts. 
RXINTF - RX Interrupt flags. 


RXINTC - Contains the updated interupt count. 
RXINTF - RX Int flags: 
(Bit 0 set, bit 14 set if TXINTF bit 0 is set.) 


Put the address of the label RXBRRT in the vector 


location. 
NOTE: The FIFO is purged by this routine. 


3 
;* SUBORDINATE ROUTINES CALLED: None. 
F-— SERKAKAESAKAKEASAAASASASKEEEESEKAKESELAREASASASALASEESSEKEKREREKARELEEERERELELE 


JSR 
ORBUFA ,RO 
RXINTC,R1 
R1 


2$ 

R1,RXINTC 
RXINTF ,R1 
#BITO,R1 
> 


#B1IT14,R1 


60$ 
R1,RXINTF 
JSR 


sSAVE CONTENTS OF GPRS RO THRU RS. 

RS ,PREGOS sCALL REGISTER SAVE SUBRT. 
sREAD THE CHAR OUT OF THE FIFO. 

sGET THE INTERUPT COUNT. 

sINCREMENT THE COUNT. 

sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
sSAVE NEW COUNT VALUE. 

;GET THE RX INTERRUPT FLAGS. 

sSET THE RX INTERRUPT HAS OCCURRED FLAG. 
sTEST THE “TX INT HAS OCCURRED” FLAG. 
sSKIP SETTING ERROR FLAG IF NO TX INT. 
sSET THE INTERRUPT ORDER ERROR FLAG. 


8 FIFO codes will cause 8 interrupts, after these 8 codes we don't want 
to check the interrupt order, because perhaps a BMP code has come in 
between the servicing of the 8 FIFO code interrupts and the servicing 
of one of the TX interrupts. 


[aia 


sTEST FOR ALL SELFTEST CODE INTS DONE. 
sSKIP UPDATING RX INT FLAGS IF EXTRA RX INTS. 
sUPDATE THE RX INTERRUPT FLAGS. 


sRESTORE GPRS. 
PC,@(SP)+ sRETURN TO PREGOS SUBRT. 






SEQ 0112 
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INTERUPT SERVICE ROUTINE 


4408 
4409 
4410 
4411 
4412 
4413 
4414 
4415 
4416 
4417 
4418 
4419 
4420 
4421 
4422 
4423 
4424 
4425 
4426 
4427 
4428 
4429 
4430 
4431 
4432 
4433 
4434 
4435 
4436 
4437 
4438 


4439 
4440 
4441 
4442 
4443 
4444 
4445 
4446 
4447 
4448 
4449 
4450 
4451 


4452 


oe 


024036 
024036 
024042 
024050 
024052 
024060 
024064 
024066 
024070 
024074 
024100 
024104 
024110 
024112 
024116 
024116 
024120 


004537 
032777 
001003 
052737 
013701 
005201 
001402 
010137 
013702 
017722 
020237 
103002 
010237 


004736 
000002 


003776 
000200 


100000 
002334 


002334 
002324 
156142 
003726 


002324 





- RXINPT - 
-SBTTL 
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INTERUPT SERVICE ROUTINE - RXINPT - 


i+ SRERERESAEEEE ERASER ESESAAEREEAEEEEEEEEEEEEEEEEEEE DEED EEEDEEEDEREREREREES 


3% - Receive Character Input Interrupt Service Routine - 

3% This service routine inputs a character from the DUT and loads the 

3* char (complete with status flags) into a receive char buffer in 

;* memory. The interrupt is also counted. The receive char buffer is 
3* monitored to ensure that it does not overflow. 

3* 

;* INPUTS: BUFEND - Labels the end of the host memory buffer. 

3% BUFPTR - Contains address of next free buffer location. 

3% CSRA - Contains the address of the DUT CSR. 

3% RBUFA - Contains the sddress of the RBUF DUT register. 

34 RXINTC - Holds the count of the number of RX interupts. 

3% RXINTF - RX Interrupt flags. 

3* 

;* OUTPUTS: BUFPTR - Contains updated address of next free buffer location. 
7% RXINTC - Contains the updated interupt count. 

7* RXINTF - RX Int flags (bit 15 set if RX.DATA.AVAIL is clear). 
;* 

3# CALLING SEQUENCE: Put the address of the label RXINPT in the vector 

;* location. 

;* 

;* COMMENTS: In case of overflow of the memory buffer, BUFPTR will be 

:* maintained equal to BUFEND and the word at BURFPTR will be 

3% the last word read from the DUT FIFO. 

3* NOTE: This routine can destroy TX.ACTIONS by reading the CSR. 


7* 
;* SUBORDINATE ROUTINES CALLED: None. 
i-- SEREREEEEEEAERESEAEAEASEEREAEAEREEAAAEEAEAEASEAREAARARAREAARESERERAREERELES 


RXINPT: : 


156174 


002336 
2s: 


4$: 


60$: 


SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
BIT > iced :TEST RX.DATA.AVAII. BIT OF THE CSR (READS CSR). 
$ 


BNE sBRANCH AROUND SETTING FLAG IF BIT IS SET. 
BIS @BITIS,RXINTF ;SET THE RX.DATA.AVAIL CLEAR FLAG. 

MOV RXINTC,R1 sGET THE INTERUPT COUNT. 

INC Ri sINCREMENT THE COUNT. 

BEQ 43 sBYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
MOV R1,RXINTC sSAVE NEW COUNT VALUE. 

MOV BUFPTR ,R2 ;GET THE POINTER TO NEXT FREE BUFFER WORD. 
MOV ORBUFA,(R2)+ sREAD A CHAR FROM THE FIFO INTO BUFFER. 

CMP R2,BUFEND sTEST FOR POINTER BEYOND END OF BUFFER. 

BHIS 60$ sSKIP THE PTR UPDATE IF PTR OUT OF BOUNDS. 
MOV R2,BUFPTR sUPDATE THE BUFFER POINTER. 

PASS sRESTORE GPRS. 

oe JSR PC ,@(SP)-+ sRETURN TO PREGOS SUBRT. 





SEQ 0113 
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—— 


4454 
4455 
4456 
4457 


4478 024122 
4479 024126 
4480 024130 
4481 024134 
4482 024142 





021627 
001402 
000177 
052737 
000002 


020140 


156210 
100000 002346 
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- TP4RTN - 
-SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RIN - 
FRRRRESESAEEEAEEREEEEEEAESERESERER ES ESSE ED EE EEEEEEEEEEEEOE EE EDEEOEEEEEEEEEEDEES 
34 Bus Time-out Trap (004 trap) Service Routine - 
3% This routine is used during the Device Register Address Access Test. 
3* It determines if the 004 trap was caused by an “expected” error or 
3* not by examining the return PC value on the stack. If the trap is 
3% unexpected, this routine jumps to the normal Diagnostic Supervisor 
3% 004 trap handling routine. 
;* 
;* INPUTS: SP - Points to the PC where the trap occured. 
;@ ADRPTR - Label at the address where “expected” traps occur. 
;* TP4FLG - 004 trap flags. 
3;* 
3# OUTPUTS: TP4FLG - Bit 15 is set if “expected” trap occured. 
3% 
;# CALLING SEQUENCE: Put address pointed to by TP4RTN in 004 vector. 
7% Occurence of 004 trap vectors to this routine. 
3% 
3* COMMENTS: Any 004 trap which occurs at an address other than that labeled 
i* ADRPTR will be handled by the normal 004 trap service routine. 
3* 


;# SUBORDINATE ROUTINES CALLED: None. 
j PRR REEEERER ESSE EERE EEEEEE ESD EE DEEDES OE OEE OE OE OEE EEEEEEEEOEDEEEEEEREEEE ERODE 


TP4RTN:: CMP la mana sCOMPARE EXPECTED ADR AGAINST TRAP RET PC. 
2 


BEQ sIF THEY MATCH, CONTINUE THIS ROUTINE. 

JMP STP4vEC sIF NOT,JUMP TO NORMAL 004 TRAP SERVICE RTN. 
2s: BIS @BIT15,TP4FLG ;SET THE 004 TRAP OCCURED FLAG. 

RTI sALL DONE, GO BACK TO THE TEST. 






SEQ 0114 
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INTERUPT SERVICE ROUTINE 


we 


4507 
4508 


4509 
4510 
4511 
4512 
4513 
4514 
4515 
4516 
4517 
4518 
4519 
4520 


4521 


024144 
024144 
024150 
024154 
024156 
024160 
024162 
024166 
024172 
024176 
024200 
024204 
024210 
024214 
024214 
024216 


004537 
013701 
005201 
102001 
005301 
010137 
013703 
017702 
100402 
052703 
052703 
010337 


004736 
000002 


003776 
002340 


002340 
002342 
156046 


100000 
000001 
002342 





- TXINTR - 
-SBTTL INTERUPT SERVICE ROUTINE - TXINTR - 
jee $660 0006660606 60606660006 06660600000606060600600006006060006000/:0000000000008 
34 - Transmit Interrupt Service Routine - 
;¢ This routine hendles a transmit interrupt from the Device Under Test 
i* (DUT) by counting the interrupt and reading the DUT CSR to cleer the 
;¢ interrupt request. This routine also sets e flag to indicete thet 
;@ ea TX interrupt hes occurred and sets e —_ if the TX.ACT.ON bit is 
;* not set in the read contents of the DUT CSR. 
;4@ 
;@ INPUTS: CSRA - Contains the eddress of the CSR. 
34 TXINTC - Holds the count of the number of TX interupts. 
34 TXINTF - TX Interrupt flegs. 
;* 
3@ OUTPUTS: TXINTC - Conteins the updated TX interupt count. 
3 TXINTF - TX Int flags (bit 0 set, bit 15 set if TX.ACTION clr). 
3 
3# CALLING SEQUENCE: Put the address of the lebel TXINTR in the vector 
;* location. 
;* 
;@ COMMENTS: 


;* 
3# SUBORDINATE ROUTINES CALLED: none 


t-- 900006660666 0066066606 6600606 66600006 66 06006006606606006606066000600066000000006 


TXINTR:: SAVE sSAVE CONTENTS OF GPRS RO THRU RS. 
JSR RS ,PREGOS ;CALL REGISTER SAVE SUBRT. 
MOV TXINTC Ri sGET THE TX INTERUPT COUNT. 
INC R1 sINCREMENT THE COUNT. 
BYvC 2$ sBRANCH IF NO OVERFLOW OCCURRED. 
DEC R1 sRESET THE COUNT TO 177777. 
2s: MOV R1, TXINTC sSAVE NEW COUNT VALUE. 
MOV TXINTF ,R3 sGET THE TX INTERRUPT FLAGS. 
MOV @CSRA,R2 sREAD THE CSR. 
BMI as sSKIP SETTING OF FLAG IF TX.ACTION IS SET. 
BIS @BIT1S5,R3 sSET THE TX.ACTION CLEAR FLAG. 
4%: BIS @6ITO,R3 sSET THE TX INT HAS OCCURRED FLAG. 
MOV R3, TXINTF sUPDATE THE TX INTERRUPT FLAGS. 
60$: PASS sRESTORE GPRS. 
oe JSR PC ,@(SP)+ sRETURN TO PREGOS SUBRT. 





SEQ 0115 
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INTERUPT SERVICE ROUTINE 


4544 

4545 024224 
024224 
024224 


104425 










SEQ 0116 
- TXINTR - 


-SBTTL REPORT CODING SECTION 


3o¢ 
; THE REPORT CODING SECTION CONTAINS THE 
; “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 


BGNRPT 
LSRPT:: 
EXIT RPT 
-WORD JSJMP 
-WORD 1L10017-2-. 
.EVEN 
ENDRPT 
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PROTECTION TABLE 


SEQ 0117 


-SBTTL PROTECTION TABLE 
SASMMCS KASAM ASAE ASSAM SKK SAS KA SKA KAAS e NS KAMA eM ANAK eK NM 








FVTSKL4.P1i1 


3 
4552 ; 
‘ 
5 Shp eink si sh sips eins sak sgh suk sk ahs ahns sind sie she sie sk wl sho ak ah ain in se she sho sh ok sik eis ahs skp sind sek she sk sh slo sic shat shes sind sind oh 


4557 se 
4558 ; THIS TABLE IS USED BY THE RUNTIME SERVICES 
ye ; TO PROTECT THE LOAD MEDIA. 

g>= 


024226 LS$PROT:: 


4563 

4564 024226 177777 -1 sOFFSET INTO P-TABLE FOR CSR ADORESS 
4565 024230 177777 -1 sOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
4566 024232 177777 -1 sOFFSET INTO P-TABLE FOR DRIVE NUMBER 





; ed 


eS 
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SEQ 0118 
PROTECTION TABLE 
4584 
4585 hodadadadahaiabatadatedetahainiaiabebaletaiatanininininisiniaiaisieininininininiaiaisininininuicuiaiesicniciccce re COPE 
4586 3 
ped 3 VOHA . INI 
4 H 
4 ao Sh adadahaadatatatalabadetahalalaiatetalaialaiataininiainiaiaiainininiaiatainininiaisinmiaiasinninaianicmneicccec ee CCCP Pry 
4590 
4591 
4592 
4593 -SBTTL INITIALIZE SECTION 
4594 ioe 
4595 FECRORAEEE EASES OESREDEEEEOAAEAEESSSEEEREEEEEAAEEEEEEALEEEEEEEDEEDEDEDEEEEEEEES 
4596 i@ This section contains the code which is performed at the beginning of 
4597 34 each pass or after a continue command. 
phe 3@ This code performs the following actions: 
;* 
4600 34 Moves the information held in the hardware P-table into the global 
4601 34 dete area. 
4602 3¢ 
4603 FOSESEASEOEEEEEEESSEEEASESEAAEEEESSEERARAEEEAAAEEEEREAEEAEEEEREEESEREDEEEEEDEES 
4604 <= 
4605 024234 BGNINIT 
024234 LS$INIT:: 
4606 sSEE IF PROGRAM JUST STARTED, BR IF YES 
4607 024234 READEF @€F.START 
024234 012700 000040 MOV EF . START, RO 
024240 104447 TRAP CSREFG 
4608 024242 BCOMPLETE NEWSTA 
024242 103416 BCS NEWSTA 
4609 sSEE IF PROGRAM JUST RESTARTED, BR IF YES 
4610 024244 READEF EF .RESTART 
024244 012700 000037 MOV EF .RESTART,RO 
024250 104447 TRAP CSREFG 
4611 024252 BCOMPLETE NEWRES 
024252 103555 BCS NEWRES 
4612 sSEE IF THIS IS A NEW PASS, BR IF YES 
4613 024254 READEF @€F .NEW 
024254 012700 000035 MOV @EF .NEW,RO 
024260 104447 TRAP CSREFG 
4614 024262 BCOMPLETE NEWPAS 
024262 103554 BCS NEWPAS 
4615 sSEE IF PROGRAM WAS JUST CONTINUED 
4616 024264 READEF #€F .CONTINUE 
024264 012700 000036 MOV EF . CONTINUE ,RO 
024270 104447 TRAP CSREFG 
4617 024272 BNCOMPLE TE GETPRM 
024272 103160 BCC GETPRM 
4618 024274 000137 025050 JMP ENDIT 
4619 024300 NEWSTA: 
4620 024300 BRESET sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
024300 104433 TRAP CSRESET 
4621 ina 
a | ; Set up for Line Time Clock interrupts. 
462 ‘ 
4624 024302 CLOCK L,R1 sGET THE CLOCK PARAMETERS. 
024302 012700 000114 MOV #'L,RO 
024306 104462 TRAP CsCLCK 
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INITIALIZE SECTION 


—— 


4625 
4626 
4627 
4628 
4629 
4630 
4631 
4632 
4633 
4634 


4635 
4636 
4637 
4638 
4639 
4640 
4641 
4642 
4643 
46448 
4645 
4646 
4647 
4648 
4649 
4650 
4651 
4652 
4653 
4654 
4655 
4656 
4657 
4658 
4659 
4660 
4661 
4662 
4663 
4664 
4665 
4666 
4667 
4668 
4669 
4670 
4671 
4672 
4673 
4€74 


024310 
024312 
024316 
024322 


024554 


010001 
012137 


012737 


012746 
012746 
013746 
012746 
104437 
062706 
013700 
006200 
010037 
106427 


013737 
012737 


005037 
012737 
012700 
013701 
004737 
013737 
103403 
005037 
000402 


004737 


013737 
012737 
005037 
005037 
012700 
013701 
005037 
005037 
004737 


002354 
002356 
002360 
002362 
002362 


000024 
000021 


000300 
023676 
002360 
000003 


000010 
002362 


002372 
000240 


000004 
624122 


002346 
000100 
002350 
002354 
020126 
002344 


002362 


017702 


000004 
024122 
002346 
002350 
002350 
002400 
002402 
002404 
020126 





000062 
002374 
002374 


002344 
000004 


002350 


000004 


002344 
000004 


2s: MOV 


43: SETVEC 


(R1i)+,CLKCSR 
(R1)+, CLKBRL 
(R1)+, CLKVEC 
(R1)+, CLKHRZ 
CLKHRZ,@S0. 


es 
#20. ,MSTICK 
4S 
#17. ,MSTICK 


CLKVEC, @CLKINT , @PRIO6 


CLKHRZ,RO 
RO 


RO ,.BCOUNT 
@PRIOS 
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SEQ 0119 

MOV RO,R1 

sSTORE CLOCK CSR ADDRESS. 

sSTORE CLOCK BUS REQ INT LEVEL. 

sSTORE CLOCK INTERRUPT VECTOR. 

sSTORE CLOCK FREQUENCY. 

sTEST FOR SOHZ LINE FREQUENCY. 

sBRANCH IF CLOCK IS NOT SOHZ. 

sINDICATE 20MS PER CLOCK TICK. 

sINDICATE 17 MS PER CLOCK TICK. 

sINITIALIZE CLOCK INTERRUPT VECTOR. 
MOV @PRIOG , - (SP) 
MOV @CLKINT, -(SP) 
MOV CLKVEC, -(SP) 
MOV 3,-(SP) 
TRAP CsSVEC 

0 #10, SP 


AD 
sINITIALIZE THE BREAK COUNT 
; TO CAUSE A BREAK 
3; EVERY 1/2 SECOND. 
sALLOW CLOCK INTERRUPTS DISABLE OTHERS. 


3° 
; Enable the Line Time Clock (LTC) checking to make sure that the CSR 


; is accessable. 
First set up to catch any 004 traps which occur: 


° 
; MOV 
MOV 


CLR 
MOV 
MOV 
MOV 
JSR 
MOV 
BCS 
CLR 
BR 


3? 
; Calibrate the 


g- 
6%: 


3° 


JSR 


; 
H Enable LTC 


4, TP4VEC 
@TP4RIN,4 


sSAVE THE EXISTING 004 TRAP VECTOR. 
sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 


checking for 004 trap in case CSR is not there. 


TP4FLG 
$BIT6,WORD1 
@WORD1 ,RO 
CLKCSR,R1 
PC ,CKTRAP 
TP4VEC 4 


sCLEAR THE 004 TRAP FLAG. 

sSET UP TO SET BIT6 OF THE LTC CSR. 

sSET UP WORD1 AS THE CKTRAP MOVE SOURCE. 

sSET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE. 
sMOVE AND CHECK FOR TRAP. 

sRESTORE THE NORMAL 004 TRAP VECTOR. 

sIF NO TRAP, LTC IS THERE SO CONTINUE. 

sCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
sBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 


DELAY routine milli-second delay count value. 


PC,CALMSL 


; Check for Memmory Management present on this machine. 
; If MEM MGT is present, disable it. 


4, TP4VEC 
@TP4RIN,4 
TP4FLG 
WORD1 
@WORD1 ,RO 
MMSRO,R1 
MMPRES 
MMENAB 

PC ,CKTRAP 


sSAVE THE EXISTING 004 TRAP VECTOR. 

sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
;CLEAR THE 004 TRAP FLAG. 

sPREPARE TO CLEAR THE MEM MGT SRO REGISTER. 
sSELECT CLEARED WORD AS CKTRAP RTN SOURCE. 
sSELECT MEM MGT SRO REGISTER AS DESTINATION. 
sINDICATE NO MEM MGT PRESENT IN CASE IT ISN‘T. 
sINDICATE MEM MGT IS NOT ENABLED. 

sCLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP. 
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INITIALIZE SECTION 


-— 


4675 
4676 
4677 
4678 
4679 
4680 
4681 


4682 
4683 
4684 
4685 
4686 
4687 
4688 
4689 
4690 
4691 
4692 
4693 
4694 
4695 
4696 
4697 
4698 
4699 


4700 


4701 
4702 
4703 
4704 
4705 
4706 
4707 
4708 
4709 
4710 
4711 
4712 
4713 
4714 
4715 
4716 
4717 
4718 
4719 
4720 
4721 
4722 
4723 
4724 
4725 
4726 


024560 
024566 
024570 
024576 
024602 


024606 
024606 
024610 
024614 
024614 


024622 
024626 
024630 


024634 
024634 
024640 
024646 


024650 
024650 
024654 
024656 
024660 
024660 
024662 


024664 
024670 
024672 
024676 
024702 
024706 
024712 
024716 
024720 
024724 


024730 
024734 
024736 
024740 
024744 
024750 
024752 
024754 


013737 
103003 


012737 


005237 
001002 
005337 


005237 
023737 
002362 


013700 
104442 
010001 


103401 
000764 


012137 
012102 
010237 
062702 
010237 
012137 
012702 
005102 
040237 
112137 


013701 
005201 
005201 
012703 
012702 
010122 
005201 
005201 


002344 
000001 


002332 
024614 


002332 
177777 


002332 
002332 


002240 
002240 


002240 


002244 


002232 
000004 
002234 
002236 
000377 


002236 


002242 


002244 


000007 
002246 





000004 
002402 


002240 


002012 


10$: 


NEWRES: BRESET 


CLR 


NEWPAS : 


3° 


MOV 


; Increment the 


This counter 


INC 
BNE 
DEC 


TP4VEC 4 
10$ 


PASCNT 
®-1,UNITN 


a 
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SEQ 0120 


sRESTORE THE NORMAL 004 TRAP VECTOR. 

sSKIP INDICATING MEM MGT PRESENT IF IT ISN'T. 
sINDICATE THAT MEM MGT IS PRESENT. 

sCLR COUNTER USED IN REPORTING ROM VERSION @. 
sSKIP AROUND THE BUS RESET, IT’S BEEN DONE. 


sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 
TRAP CSRESET 
sCLR COUNTER USED IN REPORTING ROM VERSION @. 


sRESET LOGICAL DEVICE TO -1 


pass counter, correct for any overflow. 
is used in the Rom version test. 


PASCNT 
GETPRM 
PASCNT 


sINCREMENT THE PASS COUNTER. 
sBRANCH IF WE HAVE NOT YET! OVERFLOWED. 
sSET PASS COUNT TO 177777 OCTAL. 


; GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
GETPRM: 


30$: 


12$: 


INC UNITN 

CMP UNITN,LS$UNIT 
BGE NEWPAS 
GPHARD UNITN,R1 
BCOMPLETE 30$ 
BR GETPRM 


sINCREMENT LOGICAL DEVICE NUMBER 
;SEE IF MAXIMUM UNIT NO. EXCEEDED 
:BR IF YES 


sGET P-TABLE POINTER INTO R1 
MOV UNITN,RO 
TRAP C$GPHRD 
MOV RO,R1 


BCS 30$ 


sBR IF DEVICE AVAILABLE 
sSKIP THIS DEVICE 


j#*eeeeeeees HARDWARE PARAMETER MOVING CODE seeesescaccccecs 


MOV 


(R1)+,CSRA 
(R1)+,R2 
R2,RXVECA 

$4 ,R2 

R2, TXVECA 
(R1)+,ACTLNS 
@MAPLNS ,R2 
R2 

R2,ACTLNS 
(R1)+, BRLEVL 


sSTORE DHV11-M CSR ADDRESS IN DEV.REG.ADDRESS TABLE 
sGET THE RX INTERRUPT VECTOR ADDRESS. 

sSTORE RX INT VECTOR ADDRESS. 

sCALCULATE TX INTERRUPT VECTOR ADDRESS. 

sSTORE TX INT VECTOR ADDRESS. 

sSTORE DHV11-M ACTIVE LINE BIT MAP 

sGET THE BIT MAP FOR ALL LINES. 

sGET A BIT MAP OF NON-EXISTANT LINES. 

sCLEAR NON-EXISTANT LINES FROM ACTLNS. 

:STORE DHV11-M INTERUPT BUS REQUEST LEVEL 


CALCULTATE DEVICE REGISTER ADDRESSES,AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 


CSRA,R1 
R1 


R1,(R2)+ 
Ri 
R1 


;COPY CSR ADDRESS 

s INCREMENT CSR ADDRESS 

; COPY BY 2. 

;SET UP REGISTER COUNT 

sGET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 
sSTORE REGISTER ADDRESS IN TABLE 

sINCREMENT REGISTER ADDRESS 

; BY 2,FOR THE NEXT DEVICE REGISTER. 
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INITIALIZE SECTION 


4727 
4728 
4729 
4730 
4731 
4732 
4733 
4734 
4735 
4736 
4737 
4738 
4739 
4740 
4741 
4742 
4743 
4744 
4745 
4746 
4747 


-— 


024756 
024760 


025054 


025060 
025064 
025066 
025074 


025074 
025074 
025074 


005303 
001373 


012700 
012701 
010037 
005020 
020001 
103775 


032737 
001416 
023727 
003412 


013746 
012746 
012746 
010600 
104417 
062706 


005037 


106427 


005737 
001403 
012777 


104411 
000000 





002526 
002726 
002524 


000020 002226 
002012 000001 


002240 
004076 
000002 


000006 


002352 


000240 


002362 
000100 155260 
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SEQ 0121 


DEC R3 sDECREMENT REGISTER COUNT 
BNE 12$ sLOOP IF NOT DONE 


3¢ 
:; Initialise the BMP code queue. 
3” 


MOV oBMPCQB,RO sGET THE START ADDRESS OF THE QUEUE. 

MOV @BMPCQE ,R1 sGET THE END ADDRESS OF THE QUEUE. 

MOV RO, BMPCQP -  §SET THE POINTER TO THE START OF THE QUEUE. 
14$: CLR (RO)+ sCLEAR OUT THE CONTENTS OF THE QUEUE. 

CMP RO,R1 sCHECK IF END OF QUEUE HAS BEEN REACHED. 

BLO 14$ sLOOP IF NOT ALL DONE. 


7? 
; Report the Unit number if the software P-table question was answered YES, 
3 and the maximum unit number is greater than 1. 


ge 
BIT eo sCHECK IF THE QUESTION WAS ANSWERED YES. 
$ 


BEQ sSKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 
CMP L$UNIT,@1 sCHECK MAXIMUM NUMBER OF UNITS SELECTED. 
BLE 16$ D0 NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 


PRINTF @MFUNIT,UNITN ;REPORT UNIT NUMBER. 
MOV UNITN, -C SP) 
MOV OMFUNIT, -C SP) 
MOV @2,-(SP) 


MOV SP ,RO 
TRAP CSPNTF 
ADD #6 ,SP 
16$: 
ENDIT: CLR CTRLCF ;CLR THE CTRL-C TEST ABORT FLAG. 


3° 
; Set the processor priority to allow LTC interrupts but not others. 
_ 


MTPS @PRIOS ;SET PROCESSOR PRIORITY TO 5S. 
: Enable Line Time Clock if one is available. 
TST CLKHRZ ;CHECK FOR A LTC BEING PRESENT. 
BEQ 18$ ;LTC PRESENT? NO, SKIP LTC ENABLE. 
MOV #BIT6,8CLKCSR sYES, ENABLE THE LTC. 
18$: 
ENDINIT 
L10021: 
TRAP CSINIT 
TNUM == 0 sINITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE. 
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4768 : edadadalabaialaialniahsinhaialaiaiaiainiaininininisinisisinininisinininiaininiaisinisiniainiainiainaemieecuiuincmcce 
4769 3 
4770 ; VDHA.ATOD 
4771 H 
4772 : ed al nhatabainbatalaiaheialainiaininininininininiinininiisininisinininniisaiiiiriiii tite Tit ttt tt TTL TTT LTTE RT EEE E En 
4774 
4775 
4776 -SBTTL AUTODROP SECTION 
4777 
4778 
4779 A 
4780 ; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
4781 ; THE “ADR” FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
4782 ; SEE IF THEY WILL RESPOND. THOSE THAT DON’T ARE IMMEDIATELY 
4783 ; DROPPED FROM TESTING. 
4784 -o< 
4785 
4786 025076 BGNAUTO 
025076 L$AUTO:: 
4787 
4794 
4795 025076 ENDAUTO 
025076 L10022: 
025076 104461 TRAP CS$AUTO 


SEQ 0122 





-— 
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AUTODROP SECTION 


—— 


025100 
025100 


025100 
025104 
025106 
025106 
025110 
025114 
025114 
025120 
025122 
025126 
025126 
025126 
025130 


025132 
025132 
025132 


005737 
001403 


104433 
106427 


005737 


001402 
005077 


104432 
000602 


104412 


002352 


000240 
002362 
155226 
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SEQ 0123 


Fh abaltalatalalailaininialaintaialaintalainitainisitainininiisii titi tii titi eet ete e Coie eS eT ee Stet t iti ti ttt] 


VOHA .CUC 


‘ 
5 9 9 5 i gl 5 wh gh al i 0 lg ul ul 0h fh 0 ul 0h ul uu ul ul 0 ku uh gh 0 hu 0 us 0 0h hgh ss en nw wh eh sw 


-SBTTL CLEANUP CODING SECTION 


3+ 
; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
; AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 


ss 

BGNCLN 
TST 

BEQ 

BRESET 

MTPS 
TST 

BEQ 

CLR 


EXIT 


2s: 


3$: 


-EVEN 
ENDCLN 


CTRLCF 
2$ 
#PRIOS 
CLKHRZ 
3$ 
aCLKCSR 
CLN 


L$CLEAN:: 


;DID WE GET HERE BY CTRL-C FROM TEST? 
sCTRL-C FROM TEST? NO, SKIP BUS RESET. 
sYES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 
. TRAP C$RESET 
sDISABLE DEVICE INTERRUPTS, ALLOW LTC INTS. 


TRAP CSEXIT 
-WORD L10023-. 


L10023: 
TRAP C$CLEAN 
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— 


4850 
4851 
4852 
4853 
4854 
4855 
4856 
4857 
4858 
4859 
4860 
4861 
4862 
4863 
4864 
4865 
4866 


4867 
4868 
4869 
4870 
4871 
4872 
4873 
4874 
4875 


4876 
4877 
4878 


4879 
4880 
4881 


4882 
4883 





025134 
025134 


025134 

025134 010046 
025136 012746 
025142 012746 
025146 010600 
025150 104417 
025152 062706 
025156 000427 


025160 045 
025163 125 
025166 124 
025171 066 
025174 040 
025177 117 
025202 105 
025205 106 
025210 115 
025213 125 
025216 110 
025221 040 
025224 123 
025227 116 
025232 045 


025236 
025236 
025236 000167 
025240 000000 


025160 
000002 


000006 
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SEQ 0124 


5 S656 Shp ss 5 gh sl a sh 0 gh ll 0 gh 0 0 0 ul 0 yl a ul wh gh su su wo a su gd ee sw eh SS he SB hd SO 


; 
; VOHA .DRF 


; 
hb lelatabalalatalatalalelaiatalalnitalsinintaiainiiaininininistsialaisinilinti iti iit i Litt tee eee eee Se eee ete ttt tity 


-SBTTL DROP UNIT SECTION 


zoe 
; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
; TO NO LONGER BE TESTED. 

3s 


8GNDU 
L$DU:: 
SKS K SSK AH ACS GSA GCM SASS SGKS MG Ae os SH HH Gh Os Moh HS HS wh ob eh ood hm oh eh he Bed KB Hh wh $b 9h B5S Hh 9b 1 MOK HL AK Ob OS 
3 INSERT DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
3 A “DROP” COMMAND OR A “DODU” MACRO EXECUTION. THE PURPOSE 
3 OF THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A 
3 UNIT HAS BEEN DROPPED. THIS SECTION IS OPTIONAL. 
5 5 sh hl a hl ub uu su ul uk kk uu uu us a a 6 0 hs Sh 9 0 9h 9 9 
PRINTF @DROP,RO ;REPORT UNIT THAT HAS BEEN DROPPED. 
MOV RO,-CSP) 
MOV #OROP, -( SP) 
MOV #2,-(SP) 
MOV SP ,RO 
TRAP CSPNTF 
ADD #6,SP 
BR EDROP ;BRANCH AROUND THE MESSAGE. 
DROP : -ASCIZ/#A UNITSD68A DROPPED FROM FURTHER TESTING.SN/ 
VEN 
EDROP: 
EXIT DU 
-WORD J$JMP 
-WORD L10024-2-. 
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SEQ 0125 
DROP UNIT SECTION 


4884 
4885 025242 ENDDU 
025242 L10024: 
025242 104453 TRAP C$0u 


— 
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DROP UNIT SECTION 


4887 
4888 
4889 
4890 


— 





025244 
025244 


025244 
025244 
025246 


025250 
025250 


025250 104452 








SEQ 0126 


rh bal heiabalalatalalalalalaiataialaiataisinintnialaitalsinintisinitisinintiniiti titi titi eoe ie Lie eee eee eT eee e iti titi titty 


VOHA . ADD 


i 
hahah alaiatalalatatalalnialaiainialaintalalnintaiaisintalsinintininitisinintininintiiit iii tito eerie Stet eee ei ete t itt itty 


-SBTTL ADD UNIT SECTION 


3+ 
; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 


BGNAU 


L$AU:: 


5 5 sh 0 5 5 a hu gk 0 ul ul 0 ul 0 uh 0 uh vu 0 wu hl 0 0 0 0 ws ee 


INSERT ADD CODE HERE. 
AN “ADD” COMMAND. 


THIS CODE WILL BE EXECUTED AFTER 
THE PURPOSE OF THIS CODE IS TO DO ANY 
HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 
THIS SECTION IS OPTIONAL. 


;SASAMAN SKANK KKK KKK RAK KK KKK KKK SKK KKK KS NNN KKK 


EXIT 


-EVEN 
ENDAU 


AU 





L10025: 





- WORD 
- WORD 


TRAP 





J$ IMP 


L10025-2-. 


C$AU 
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SEQ 0127 
HARDWARE TEST - ADRA - 
4921 -SBTTL HARDWARE TEST - ADRA - 
4922 i++ 
4923 FRRREEEEESEEEESEAEEEEEAEEEEE EERE DEES EEEEOEEEEE OE ODEEEEODEEEEDEEEEEEREODEDEEDD EES 
4924 3% - REGISTER ADDRESS TEST - 
4925 3* 
4926 ;* This test verifies that the Q-bus can read and write to the DHVi1 
4927 3% device registers. If the DHV11 does not respond to the access 
4928 3* attempts (If the DHV11 is at the wrong address, for example) the 
4929 7% 004 bus time-out trap is detected by this routine and an error 
4930 3% is reported. 
4931 i* 
4932 FRRREEEREEAEAEEEEEEEEEREEEEEE EE EEEEEE ED OE OEE OE ODOEEDOD EEE ODED EEEEEREEEREREEE 
4933 poe 
4934 
4935 025252 BGNTST 
025252 Ti:: 
4936 000001 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
4937 025252 012737 000001 002326 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (1 
4938 025260 012737 177777 002352 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
4939 i+ 
4940 ; Set up to catch any 004 traps which occur: 
4941 3 
4942 025266 013737 000004 002344 MOV 4, TP4VEC sSAVE THE EXISTING 004 TRAP VECTOR. 
4943 025274 012737 024122 000004 MOV @TP4RTN,4 sSET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
pee 025302 005005 CLR RS ;CLEAR THE ERROR FLAGS. 
4946 i¢ 
4947 ; Set up for the initial iteration of the test loop: 
4948 s- 
rood 025304 005004 CLR R4 sCLEAR THE LINE COUNTER. 
4950 
4951 i¢ 
4952 ; Here begins the loop to test the registers for a line. 
ore ; First test the CSR and set the IND.ADR.REG (I.A.R) field. 
4954 i- 
4955 025306 005037 002346 2s: CLR TP4FLG ;CLEAR THE 004 TRAP FLAG. 
4956 025312 013700 002244 MOV CSRA,RO sSET UP CSR AS THE CKTRAP MOVE SOURCE. 
4957 025316 012701 025532 MOV #52$,R1 sSET UP DESTINATION LOCATION FOR CKTRAP MOVE. 
4958 025322 004737 020126 JSR PC ,CKTRAP sMOVE AND CHECK FOR TRAP. 
4959 025326 103402 BCS 4$ ;IF NO TRAP, BYPASS ERROR. 
4960 025330 052705 100001 BIS #100001,R5 ;SET FATAL READ ERROR FLAGS. 
4961 025334 042737 000017 025532 43: BIC #17,52$ s;CLEAR THE I.A.R FIELD OF THE CSR DATA. 
4962 025342 050437 025532 BIS R4,52$ ;OR IN THE LINE COUNTER TO THE I.A.R FIELD. 
4963 025346 010100 MOV R1,RO0 sUSE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 
4964 025350 013701 002244 MOV CSRA,R1 sSET UP CSR AS THE CKTRAP MOVE DESTINATION. 
4965 025354 004737 020126 JSR PC ,CKTRAP sMOVE AND CHECK FOR TRAP. 
4966 025360 103403 BCS 6$ ;IF NO TRAP, BYPASS ERROR. 
4967 025362 052705 100002 BIS #100002,R5 ;SET FATAL WRITE ERROR FLAGS. 
4968 025366 000440 BR 40$ sEXIT AND REPORT FATAL ERROR. 
4969 i¢ 
4970 ; Now, we test each register for this line. 
4971 3° 
4972 025370 012702 000010 6$: MOV #10,R2 sINIT REGISTER COUNTER TO 8. 
4973 025374 013737 002244 025530 MOV CSRA,50$ sINITIALIZE THE REGISTER POINTER. 
4974 025402 012700 025530 8$: MOV @50$ ,RO ;SET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 
4975 025406 012701 025532 MOV #52$,R1 sSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 
4976 025412 004737 020126 JSR PC ,CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 





ee 
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HARDWARE TEST - ADRA - 
4977 025416 103402 BCS 
4978 025420 052705 100001 BIS 
4979 025424 010100 10$: MOV 
4980 025426 012701 025530 MOV 
4981 025432 004737 020126 JSR 
4982 025436 103402 BCS 
4983 025440 052705 100002 BIS 
4984 025444 005237 025530 12$: INC 
4985 025450 005237 025530 INC 
4986 025454 005302 DEC 
4987 025456 001351 BNE 
4988 
4989 i¢ 
4990 ; Now we set up 
4991 ‘- 
4992 025460 005204 INC 
4993 025462 020427 000010 CMP 
4994 025466 002707 BLT 
4995 
4996 3¢ 
4997 ; Done check ing 
4998 F Report any 
4999 3 
5000 025470 013737 002344 000004 403: MOV 
5001 025476 005705 TST 
5002 025500 100015 BPL 
5003 
5004 025502 ERROF 
025502 104455 
025504 000145 
025506 006067 
025510 016070 
5005 
5006 025512 DODU 
025512 013700 002240 
025516 104451 
5007 025520 005037 002352 CLR 
5008 025524 DOCLN 
025524 104444 
5009 025526 000402 BR 
5010 i+ 
5011 ; Locel storage. 
5012 t- 
5013 025530 000000 50$: . WORD 
5014 025532 000000 52s: . WORD 
5015 025534 005037 002352 60$: CLR 
5016 025540 ENDT 
025540 
025540 104401 


—— 
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10$ sIF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
#100001,R5 ;SET FATAL READ ERROR FLAGS. 

R1,RO sUSE OLD DEST AS SRC FOR CKTRAP MOVE. 

#50$,R1 sSET UP REGISTER AS THE UcST FOR CKTRAP MOVE. 
PC ,CKTRAP sPERFORM THE MOVE, CHECK FOR TRAP. 

12$ sIF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 
#100002 ,R5 ;SET FATAL WRITE ERROR FLAGS. 

50$ sINCREMENT THE REGISTER 

50% ; POINTER BY 2. 

R2 ;COUNT THE REGISTER. 

8$ ;LOOP TO TEST THE NEXT REGISTER ADDRESS. 

to test the next line, or to exit if we are done. 

R4 sINCREMENT THE LINE COUNTER. 

R4, @NUMLNS sCOMPARE LINE COUNTER AGAINST NUMBER OF LINES. 
23 sLOOP TO TEST THE NEXT LINE IF WE'RE NOT DONE. 


device register addresses. 


errors and exit. 

TP4VEC 4 sRESTORE THE NORMAL 004 TRAP VECTOR. 
RS ;CHECK THE ERROR FLAGS. 

60$ sEXIT ROUTINE IF NO ERRORS. 


; REPORT “DEVICE REGISTER ACCESS ERRORS” 


101,EM0103,ERO101; >>>>> ERROR @101 <<ccc, 
TRAP CSEROF 
-WORD 101 
-WORD €&MO0103 
-WORD ERO1O1 
UNITN sDROP THIS UNIT FROM FUTHER TESTING. 
MOV UNITN,RO 
TRAP CsD00uU 
CTRLCF sINDICATE NO CTRL-C ABORT FROM TEST. 
;ABORT THIS SUB PASS. 
TRAP CSOCLN 
60% 3 
0 sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
0 sSTORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 
CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
L10026: 
TRAP CSETST 








SEQ 0128 















CVDHADO DHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 103 


SEQ 0129 
HAROWARE TEST - MRSTA - 














-SBTTL HARDWARE TEST - MRSTA - 































5019 5 O% S6OO66060606 00 000000000006 000060000006 0000000000000000000000000000000000008 
5020 3% - Master Reset With Selftest Test - 
5021 34 This test verifies that the Mester Reset bit will cleer efter e device 
oe 3* reset and the performance of the DUT ROM based selftest. 
3* 
5024 j-- S808460606 0606 6600000006000 60000000000000006060000000000000000000000000008 
5025 025542 BGNTST 
025542 Te:: 
5026 000002 TNUM == TNUM « 1 sINCREMENT THE A SEMBLY TIME TEST COUNTER. 
5027 025542 012737 000002 002326 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (2) 
5028 025550 012737 177777 002352 MOV #-1,CTRLCF sINDICATE THAT &W. ARE IN A TEST. 
5029 025556 012737 000001 003766 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
5030 025564 012737 006125 003772 MOV @EMO201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
at 025572 012737 016406 003774 MOV @#ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3¢ 
pees ; Wait up to 5 seconds for the DUT Mester Reset bit to clear. 
3° 
5035 025600 012701 011610 MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5036 025604 012702 000040 MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 
5037 025610 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
5038 025612 013704 002244 MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
5039 025616 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
coon 025622 103410 BCS 23 sSKIP TO RESET DUT IF MR CLEAR. 
3¢ 
5042 ; DUT Master Reset bit did not go clear. Device may be stuck in some 
cess s odd state. Try to reset device with ea bus reset. 
ge 
5045 025624 BRESET sNO, TRY TO JOG DEVICE WITH BUS RESET. 
025624 104433 TRAP CSRESET 
5046 025626 004737 022330 JSR PC,SKPSTS sTRY TO SKIP THE SELFTEST. 
5047 025632 012701 011610 MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5048 025636 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
pees 025642 103016 BCC 4s sGO REPORT ERROR IF MR BIT DID NOT CLEAR. 
3° 
os + Set the Master Reset bit and verify that it clears within the proper time. 
i 
5053 025644 012701 011610 23: MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5054 025650 010214 MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
5055 025652 004737 020340 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
5056 025656 103010 BCC 4g sGO REPORT ERROR IF MR BIT DID NOT CLEAR. 
5057 025660 012702 011610 MOV #5000. ,R2 
5058 025664 160102 SUB R1,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
5059 025666 001413 BEQ 6$ 3GO REPORT ERROR IF MR CLEAR IMMEDIATELY. 
5060 025670 020227 000764 CMP R2,#500. 
5061 025674 002417 BLT 8$ sGO REPORT ERROR IF MR CLEAR IN < 1/2 SECOND. 
nor 025676 000424 BR 60$ sEXIT THE TEST WITHOUT ERROR. 
3¢ 
5064 ; Error reports: 
5065 s- 
5066 sReport MR bit would not clear after e DUT reset. 
5067 025700 012737 000311 003770 4%: MOV #201. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
5068 025706 012701 006173 MOV #EM0202,R1 sSELECT ERROR MESSAGE. 
5069 025712 ERROR sREPORT ERROR. >>>>> ERROR @201 <<<<< 
025712 104460 TRAP CSERROR 
ty 025714 000415 BR 60$ sEXIT THE TEST. 











5072 

5073 025716 

5074 025724 

5075 025730 
025730 

5076 025732 

5077 

5078 

5079 025734 


5082 
5083 025750 
5084 
5085 025754 


025754 
025754 





012737 
012701 


104460 
000406 
012737 
012701 
104460 
005037 


104401 


000312 
006346 


000313 
006511 


002352 


- MRSTA - 





003770 6%: 


003770 8%: 
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HARDWARE TEST 


sReport MR bit cleer ee after DUT reset. 
MOV #202. ,ERRNBR 


e< sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV @€M0203,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. 
BR 60% sEXIT THE TEST. 
sReport MR clear within 1/2 second of DUT reset 
MOV #203.,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV £40204, Ri sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. 
CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 


L10027: 


TRAP 


TRAP 


TRAP 









>>>>> ERROR #202 <<<<< 


CSERROR 


>>>>> ERROR 0203 <<<<< 


CSERROR 


CSETST 
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SEQ 0131 
HARDWARE TEST - MRSSTA - 
5087 -SBTTL HARDWARE TEST - MRSSTA - 
5088 tee SOCROEESEEEEERESEEAERERESEAESEEEREDAEEEREDEEEEEDEDDEEDEEODEDEEEEDEEEEEEEEES 
5089 34 - Master Reset With Skip Selftest Test - 
5090 : 34 This test verifies that the Master Reset bit will clear after a device 
ose] 3* reset and the skipping of the DUT ROM based selftest. 
3% 
5093 t-- SOCRASEEEEEEEESELEEDEAEDEAEEEEEREREEAREREADAEREEEEEEODDEEREEEEEREDEREDEEEES 
5094 025756 BGNTST 
025756 T3:: 
5095 000003 : TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
5096 025756 012737 000003 002326 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (3) 
$097 025764 012737 177777 002352 MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
$098 025772 012737 000001 003766 MOV #1 ,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
5099 026000 012737 006670 003772 MOV @EMO301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
see 026006 012737 016406 007 °4 MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3° 
te | ; Wait up to 5S seconds for the DUT Master Reset bit to clear. 
5104 026014 012701 011610 MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
$105 026020 012702 000040 MOV @BITOS,.R2 sWAITING FOR MASTER RESET BIT. 
5106 026024 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
$107 026026 013704 002244 MOV CSRA,R4 ;BIT IS IN THE DUT’S CSR. 
5108 026032 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ore 026036 103410 BcS 2s sSKIP TO RESET DUT IF MR CLEAR. 
il 3° 
S111 ; DUT Master Reset bit did not clear. Device may be stuck in some 
st + odd stete. Try to reset device with a bus reset. 
11 3° 
5114 026040 BRESET sNO, TRY TO JOG DEVICE WITH BUS RESET. 
026040 104433 TRAP CSRESET 
5115 026042 004737 022330 JSR PC,SKPSTS ;TRY TO SKIP THE SELFTEST. 
5116 026046 012701 011610 MOV #5000. ,.R1 sTIME-OUT VALUE IS 5.0 SECONDS. 
5117 026052 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
a. 026056 103024 Bcc 6$ 3GO REPORT ERROR IF MR BIT DID NOT CLEAR. 
1 3° 
5120 ; Set the Master Reset bit, try to skip the selftest, and verify that the 
pees ; MR bit clears within 1/5 second. 
12 $- 
5123 026060 012701 000310 23: MOV #200. ,R1 sTIME-OUT VALUE IS 1/5 SECOND. 
5124 026064 010214 MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
5125 026066 004737 022330 JSR PC,SKPSTS sTRY TO SKIP THE SELFTEST. 
5126 026072 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
5127 026076 103007 BCC ay :3GO FIND OUT WHAT IS WRONG IF MR NOT CLEAR. 
5128 026100 012702 000310 MOV #200. ,R2 
5129 026104 160102 SUB R1,R2 sCALCULATE @ OF MS FOR MR TO CLEAR. 
5130 026106 020227 000012 CMP R2,010 
5131 026112 002415 BLT 8$ :GO REPORT ERROR IF MR CLEAR IN < 10 MS. 
to 026114 000431 BR 60$ sEXIT THE TEST WITHOUT ERROR. 
1 3° 
ao ; MR did not clear within 1/5 second, see if it clears within 5 seconds. 
1 g° 
5136 026116 012701 011300 4$: MOV 4800. ,R1 sTIME-OUT VALUE IS 5 SECONDS MINUS 1/5 SECOND. 
5137 026122 004737 020340 JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ote 026126 103416 BCS 10$ 3GO REPORT ERROR IF MR CLEARED FINALLY. 
3? 
5140 ; Error reports: 
5141 s- 
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HARDWARE TEST 


$142 

5143 026130 

5144 026136 

5145S 026142 
026142 

5146 026144 

5147 

5148 

5149 026146 

5150 026154 

5151 026160 
026160 

5152 026162 


5155 026164 
5i56 026172 
5157 026176 

026176 


5159 026200 
$161 026204 


026204 
026204 





012737 
012701 


104460 
000415 
012737 
012701 
104460 
000406 
012737 
012701 
104460 


005037 


104401 


- MRSSTA - 


000455 003770 


006173 


000456 
006733 


000457 
007073 


002352 


003770 


003770 






sReport MR bit would not clear after a DUT reset. 


6$: MOV #0301. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #€M0202,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0301 <<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
sReport MR bit clear within 10 ms after DUT reset. 
8$: MOV #0302. ,ERRNBR sSET THE ERROR NUMBER =). ERROR TABLE. 
MOV E€M0302,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR 00302 <<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
sReport MR cleared between 1/5 second and 5 seconds of DUT reset. 
10$: MOV $0303. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0303,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0303 <<<<< 
TRAP CSERROR 
603: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 


L10030: 


TRAP CsETST 








HARDWARE TEST 


-— 


5163 
5164 
5165 
3166 
3167 
5168 
5169 
5170 
$171 


5172 
5173 
5174 
$175 
$176 
5177 
5178 
5179 


026346 
026354 
026360 





000004 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103015 


012400 
012701 
011402 
010200 
042700 
020027 
001012 
005301 
001367 
000415 


012737 
012701 


104460 
000406 


012737 
012701 


SS a SN 
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- RXCHRA - 


000004 
177777 
000001 
007252 
016406 


011610 
000040 


002244 


022330 
020340 


000006 


177476 
000201 


000621 
006173 


000622 
007321 





003770 


003770 





SEQ 0133 

-SBTTL HARDWARE TEST - RXCHRA - 
tee RREEREREEEEEAEEEEEEEEEEAESEESARESEAEEEEEEAEREDAEEEEREKEDEREEEDEDREDEEREDEEERSE 
;¢ - RBUF Register RX Character Field Test - 
34 This test verifies that the RX Character Field of the DUT RBUF register 
3% appears to be functioning correctly. This test uses the codes which 
34 should be in the FIFO after a board reset and skip selftest sequence. 
3% 
t-- FREAKS AAEEEEEEEAEAEEEAAEAEESEERAREKAEEREEAAEEEERESEEERE REDDER EAEERRALEES 

BGNTST ¢ 

4:: 

TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (4) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV EM0401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3¢ 
; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
; and wait up to 5 seconds for the MR bit to clear. 


MOV #5000. ,R1 s;TIME-OUT VALUE IS 5.0 SECONDS. 
MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 
CLR R3 sWAITING FOR BIT TO CLEAR. 
MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 
MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
JSR PC,SKPSTS sSKIP THE SELFTEST. 
JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 43 ;GO REPORT ERROR IF MR DID NOT CLEAR. 
3¢ 
; Read 6 characters from the DUT and verify that they are valid selftest 
; codes. 
MOV (R4)+,RO sINCREMENT POINTER TO POINT TO DUT REUF REGSTR. 
MOV #6 ,R1 sINITIALIZE THE LOOP COUNTER. 
2s: — gl Pi sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 
MOV . 
BIC #177476,RO sREMOVE ALL BUT BITS SPECIFIC TO SELFTEST CODE. 
CMP RO, #201 sCHECK THAT BITS 0,6, AND 7 ARE CORRECT. 
BNE 6$ sGO REPORT ERROR IF CODE IS NOT SELFTEST CODE. 
DEC Ri sCOUNT THIS LOOP ITERATION. 
BNE 2s sLOOP IF NOT ALL LINES DONE. 
BR 60$ sEXIT TEST, NO ERROR FOUND. 


7 
; Error veports: 
= 

sReport MR bit would not clear after a DUT reset. 


4$: MOV #0401.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV EM0202,R1 ;SELECT ERROR MESSAGE. 
ERROR s;REPORT ERROR. »>>>> ERROR @0401 <<«<< 
TRAP CSERROR 
BR 60$ s;EXIT THE TEST. 
sReport improper code found in DUT RBUF after reset (skip selftest). 
6$: MOV #0402.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV %EM0402,R1 s;SELECT ERROR MESSAGE. 
ERROR ;REPORT ERROR. >>>>> ERROR #0402 <<<<< 
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SEQ 0134 
HARDWARE TEST - RXCHRA - 

_— 026360 104460 TRAP CSERROR 
aod 026362 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
22 
5221 026366 ENDTST 

026366 L10031: 

026366 104401 TRAP CSETST 


—— 
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-— 


026524 
026532 
026536 
026536 


000005 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103013 


012400 
012701 
011402 
012700 
040200 
001012 
005301 
001371 
000415 


012737 
012701 


104460 
000406 
012737 
012701 


104460 


- RXFFDA - 


011610 
000040 


002244 


022330 
020340 


000010 
070000 


000765 


006173 


000766 
007537 





002326 
002352 
003766 
003772 
003774 


003770 


003770 


-SBTTL HARDWARE TEST - RXFFDA - 
BS laachatecaceceteecehndahcdee thi ide LL LLL LLL LLL TL TTT TT TT TTT TTT TTT TTT ttt 
34 - RBUF Register RX Flag Field Test - 
3* This test verifies that the Field of 3 flag bits in the RBUF reads 
3% as all ones when the Selftest codes are being read from the DUT 
3% after a board reset and skip selftest sequence. 
3% 
i-- SEREEREASEEEREEEEEEEAREE SEERA EREE ED EEEE SEES EE EEEEOEEEEEEE ES EREREEEEEEEERES 
BGNTST - 
TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (5) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EMOSO1,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3¢ 
; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
+ and weit up to 5 seconds for the MR bit to clear. 


MOV #5000. ,R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 

MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA ,R4 sBIT IS IN THE DUT'S CSR. 

MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS sSKIP THE SELFTEST. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 4$ sGO REPORT ERROR IF MR DID NOT CLEAR. 


3¢ 

; Read 8 characters from the DUT and verify that all 3 RX error flags are 
; set for each characters. 

i 


MOV (R4)+,RO sINCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 
MOV 8.,R1 sINITIALIZE THE LOOP COUNTER. 

2s: MOV (R4),R2 sREAD A CHARACTER FROM THE DUT RBUF REGISTER. 
MOV #70000 ,RO 
BIC R2,RO0 sCALCULATE BIT MAP OF CLEAR RX ERROR FLAGS. 
BNE 6$ sGO REPORT ERROR IF NOT ALL RX ERROR FLAGS SET. 
DEC R1 sCOUNT THIS LOOP ITERATION. 
BNE 2$ sLOOP IF NOT ALL LINES DONE. 
BR 60$ sEXIT TEST, NO ERROR FOUND. 


3¢ 
; Error reports: 


sReport MR bit would not clear after a DUT reset. 


4$: MOV #0501. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
MOV %EM0202,R1 ;SELECT ERROR MESSAGE. 
ERROR ;REPORT ERROR. >>>>> ERROR #0501 <<<<< 
TRAP CSERROR 
BR 60$ s;EXIT THE TEST. 
sReport one or more RX error flags found set with selftest code. 
6$: MOV #0502. ,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0502,R1 sSELECT ERROR MESSAGE. ~ 
ERROR ;REPORT ERROR. >>>>> ERROR #0502 <<<<< 


TRAP CSERROR 








SEQ 0135 
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SEQ 0136 
HARDWARE TEST - RXFFDA - 

5277 
dad 026540 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
2 
5280 026544 ENDTST 

026544 L10032: 

026544 104401 TRAP CSETST 


-— 
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- RDAA - 


HARDWARE TEST 


—— 


5282 
5283 
5284 
5285 
5286 


000006 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103016 


032714 
001422 


012705 
010403 
012300 
011300 
032714 
001427 
005305 
001372 
000416 


012737 
012701 


104460 
000415 


000006 
177777 
000001 
010073 
016406 


011610 
000040 


002244 


022330 
020340 


000200 


001130 


000200 


001131 
006173 


002326 
002352 
003766 
003772 
003774 


003770 





SEQ 0137 

-SBTTL HARDWARE TEST - RDAA - 
FO + SERRE RESE ORES DEEDES EODE EE EEEEEEEE DEED OO OE OS OE OEE OO OE OE OO OE OE OOOEEEEEEEES 
3% - CSR RX Data Available Bit Test - 
3% This test verifies that the DUT CSR RX Date Available Bit is set by the 
34 inclusion of the selftest codes in the DUT FIFO and that the bit clears 
3% after the FIFO has been emptied. 
3* 
Salli acachathshacpeethebstnsatehteeteedceee ehh L LLL LLL LLL LLL TTT TTT TTT TTT TTT Te TT Tet ts 

BGNTST t. 

TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV #TNUM, TSTNUM ;SET UP THE TEST NUMBER. (6) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EM0601,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
3¢ 


; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
; and wait up to 5 seconds for the MR bit to clear. 


MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV *BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT'S CSR. 

MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS sSKIP THE SELFTEST. 

JSR PC ,MSLGET sWAIT FOR GUT_CSR_MR BIT TO CLEAR. 

BCC 4$ :GO REPORT ERROR IF MR DID NOT CLEAR. 
3° 
; Check that the RX Date Available bit is set. 
BIT #BIT7,(R4) sTEST THE DUT RX.DATA. AVAIL BIT. 

BEQ 6$ ;GO REPORT ERROR IF BIT IS NOT SET. 
3¢ 
; Read characters from the DUT RX FIFO and wait for RX.DATA. AVAIL to go clear. 
; = om sALLOW READING 600 CHARS BEFORE ERROR. 

V ’ 

MOV C(R3)+,RO sCALCULATE THE RBUF ADDRESS. 
2s: MOV C(R3),RO sREAD A CHARACTER FROM THE RX FIFO. 

BIT *BIT7,(R4) sTEST THE DUT RX.DATA.AVAIL BIT. 

BEQ 60$ sEXIT TEST WITHOUT ERROR IF RX.DATA.AVAIL CLR. 

DEC RS sCOUNT THE CHARACTER JUST READ. 

BNE 2s ;LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

BR 8$ sGO REPORT ERROR IF RX.DATA. AVAIL WOULDN'T CLR. 


;¢ 
; Error reports: 
3° . 
iReport MR bit would not clear aftér a DUT reset. 


4$: MOV #0601.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0202,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #0601 <<<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 


sReport that RX.DATA.AVAIL bit was not set after a reset completion. 
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SEQ 0138 
HARDWARE TEST - RDAA - 
5337 026710 012737 001132 003770 6%: MOV #0602. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
5338 026716 012701 010127 MOV %EM0602,R1 sSELECT ERROR MESSAGE. 
5339 026722 ERROR sREPORT ERROR. >>>>> ERROR #0602 <<<<< 
026722 10446 TRAP CSERROR 
eat 026724 000406 BR 60$ sEXIT THE TEST. 
5342 sReport that RX.DATA.AVAIL bit could not be cleared by purging FIFO. 
5343 026726 012737 001133 003770 83: MOV #0603. ,ERRNBR sSET THE ERROR NUMBER IN ERROR TABLE. 
5344 026734 012701 010307 MOV %€M0603,R1 sSELECT ERROR MESSAGE. 
5345 026740 ERROR sREPORT ERROR. >>>>> ERROR #0603 <<<<< 
— 026740 104460 TRAP CSERROR 
ted 026742 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
5349 026746 ENDTST 
026746 L10033: 
026746 104401 TRAP CSETST 





— 
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a 


027062 


027064 
027072 
027076 
027076 
027100 


027102 
027110 


000007 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
010214 
004737 
004737 
103012 


012400 
005714 
100016 


012705 
011400 
100027 
005305 
001374 
000416 


012737 
012701 


104460 
000415 


012737 
012701 


- ROVA - 


000007 
177777 
000001 
010472 
016406 


011610 
000040 


002244 


022330 
020340 


001130 


001275 
006173 


001276 
010527 


002326 
002352 
003766 
003772 
003774 


003770 


003770 





-SBTTL HARDWARE TEST - RDOVA - 
FO + RRRRERREEEEEEERERERESESELAREREREEEEEE REDE EEEEED EEE DEEDES ES OEEEEEEEEDEDEEE 
pa - RBUF RX Date Valid Bit Test - 
3* This test verifies that the DUT RBUF RX Data Valid Bit is set by the 
3* inclusion of the selftest codes in the DUT FIFO and that the bit clears 
3% after the FIFO has been emptied. 
3% 
Peretti titi tititititi tt titi titi i titi ti tit tT ttt tt TTT TTT TT TTT TTT TTT TTT TT TTT TTT 
BGNTST 1 
TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (7) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EMO701,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @ERO201,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3¢ 

; Set the DUT CSR Master Reset (MR) bit, perform the skip selftest sequence, 
; and wait up to 5 seconds for the MR bit to clear. 

3° 


MOV #5000. ,R1 ;TIME-OUT VALUE IS 5.0 SECONDS. 

MOV #BITOS,R2 s;WAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 ;BIT IS IN THE DUT‘S CSR. 

MOV R2,(R4) ;SET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS ;SKIP THE SELFTEST. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BCC 4$ :GO REPORT ERROR IF MR DID NOT CLEAR. 
3¢ 
; Check that the RX Data Valid bit is set. 
s- 

MOV (R4)+,RO sINCREMENT POINTER TO PNT TO DUT RBUF REG. 

TST (R4) sTEST THE DUT RX.DATA.VALID BIT. 

BPL 6$ 3GO REPORT ERROR IF BIT IS NOT SET. 
3¢ 
; Read characters from the DUT RX FIFO and wait for RX.DATA.VALID to go clear. 

MOV #600. ,R5 sALLOW READING 600 CHARS BEFORE ERROR. 
23: MOV CR4),RO sREAD A CHARACTER FROM THE RX FIFO. 

BPL 60$ sEXIT TEST WITHOUT ERROR IF BIT IS CLEAR. 

DEC RS ;COUNT THE CHARACTER JUST READ. 

BNE 2$ ;LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

BR 8$ 3GO REPORT ERROR IF RX.DATA.VALID WOULDN'T CLR. 


3* 
; Error reports: 
- 
sReport MR bit would not clear after a DUT rese 


4$: MOV #0701.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0202,R1 ;SELECT ERROR MESSAGE. 
ERROR ;REPORT ERROR. >>>>> ERROR @0701 <<<<< 
TRAP CsERROR 
BR 60$ sEXIT THE TEST. 
sReport that RX.DATA.VALID bit was not set after a reset completion. 
6$: MOV #0702.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV #EM0702,R1 ;SELECT ERROR MESSAGE. 


SEQ 0139 








5406 


$407 
5408 
5409 
5410 


027114 
027114 
027116 


027120 

5411 027126 

5412 027132 
027132 

5413 

5414 027134 

$415 

5416 027140 

027140 

027140 
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104460 
000406 


012737 
012701 
104460 


005037 


104401 
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- RDVA - 
ERROR sREPORT ERROR. >>>>> ERROR #0702 «<<< 
TRAP CSERROR 
BR 60$ sEXIT THE TEST. 
sReport that RX.DATA.VALID bit could not be cleared by purging FIFO. 
001277 003770 83: MOV #0703.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
010707 MOV 9EM0703,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0703 <<<<< 
TRAP CSERROR 
002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
L10034;: 
TRAP CSETST 








SEQ 0140 
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HARDWARE TEST 


5426 027142 
027142 


5428 027142 
5429 027150 
5430 027156 
5431 027164 


5436 027172 
5437 027176 
5438 027202 
5439 027204 
5440 027210 
5441 027212 
5442 027216 
5443 027222 


5449 027224 
5450 027226 
5451 027230 
5452 027232 
5453 027234 
5454 027236 
5455 027242 
5456 027244 
5457 027246 
5458 027250 
5459 027254 
5460 027256 


5466 027260 
5467 027266 
5468 027274 
5469 027300 

027300 
5470 027302 


Te 


000010 
012737 
012737 
012737 
012737 


012701 


012737 
012737 
012701 


104460 
000411 


- RLNA - 


000010 
177777 
000001 
011072 


011610 
000040 
002244 


022330 
020340 


177760 


000010 


001441 
016470 
006173 


003770 
003774 





-SBTTL HARDWARE TEST - RLNA - 
bO% S8OOO60006 000666066000 00060006006006 6000 00060000000000600600000000000006000 
;¢ - RBUF RX Line Number Field Test - 
3% This test verifies that the DUT RBUF RX Line Number field is working 
;* correctly by utilizing the selftest codes which ere put in the RX 
34 FIFO efter ea boerd reset. 
3% 
i-- SO00066006 00060604 6000000600 600660000600000000000000000000000000000000008008 
BGNTST 
T8:: 
TNUM == TNUM « 1 s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (8) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @EMO801,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
3¢ 


; Set the DUT CSR Mester Reset (MR) bit, perform the skip selftest sequence, 
+ end wait up to 5 seconds for the MR bit to clear. 


MOV #5000. ,R1 sTIME-OUT VALUE IS 5.0 SECONDS. 

MOV @BIT05,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA ,R4 sBIT IS IN THE DUT‘S CSR. 

MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 

JSR PC, SKPSTS sSKIP THE SELFTEST. 

JSR PC .MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
Bcc ae sGO REPORT ERROR IF MR DID NOT CLEAR. 


3° 
+ Read characters from the DUT RX FIFO end verify that the line numbers ere 
; correct. 

; One cheracter is read from the FIFO for each possible line on the DUT. 


CLR R1 sCLEAR THE LINE COUNTER. 

MOV (R4)+,RO sINCREMENT POINTER TO PNT TO THE DUT RBUF REG. 
2$: MOV (R4),R2 sREAD A CHARACTER FROM THE DUT RX FIFO. 

MOV R2,R3 

SWAB =R3 

BIC #177760,R3 sREMOVE ALL BUT LINE NUMBER BITS. 

CMP R3,R1 sCOMPARE WITH EXPECTED LINE NUMBER. 

BNE 63 sGO REPORT ERROR IF LINE NUMBERS DON’T MATCH. 

INC R1 sINCREMENT THE EXPECTED LINE NUMBER. 

CMP R1, @NUMLNS sCOMPARE WITH NUMBER OF LINES ON DUT. 

BNE es sLOOP UNTIL CODES FOR ALL LINES ARE READ. 

BR 60$ sEXIT TEST WITHOUT ERROR. 


3? 
; Error reports: 
- 
sReport MR bit would not cleer after e DUT reset 


43: MOV #0801.,ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 
MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADORESS IN ERROR TABLE. 
MOV @€M0202,R1 sSELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @0801 <<<<< 


TRAP CSERROR 
BR 60% sEXIT THE TEST. 


sReport thet RX Line Number field is wrong for selftest code. 























SEQ 0141 
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5505 027370 
5506 027374 
5507 027376 


5513 027410 
: 027412 


000011 
012737 
012737 
012737 
012737 


012701 


012701 


104455 
001605 


- BMPCHK - 


003770 


SEQ 0143 


-SBTTL HARDWARE TEST - BHPCHK - 
$O% ChOOO660060000 000000 060000006060 000606000006 0000060000000000000000000000008 
- BMP check Test - 

This test is used to verify thet the DUT does not immediately feil 
the on-board beckground-monitor program, and hence invel idete 
succeeding tests. 
This test looks for BMP codes in the fifo for e set period immediately 
efter the self-test is skipped. 
Any BMP codes thet ere found ere saved on the queue end ere also 
reported in this test. 


So - 666660468460 06 66 0604646606808 00000600 06000006 0006000000060 00000000 00000860868008 
BGNTST 


T9:: 
TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
@TNUM, TSTNUM sSET UP THE TEST NUMBER. (9) 

@-1, CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
#1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 

#0901.,ERRNBR ;SET THE ERROR NUMBER. 


3¢ 
; Wait up to 3 seconds for the DUT Mester Reset bit to cleer. 
s If time-out occurs, then exit this test. 


#3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 
#BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

R3 sWAITING FOR BIT TO CLEAR. 
CSRA,R4 sBIT IS IN THE DUT'S CSR. 

AT anal sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 


sABORT THE TEST IF MR DID NOT CLEAR. 
3¢ 
; Reset the DUT, skip the self-test. 


ge 
MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 
JSR PC ,SKPSTS sWRITE THE SKIP SELFTEST CODES TO THE DUT. 


“Wait for Mester reset to cleer. Deley for 500 milli-secs before purging 
3 the fifo. 


sTIME-OUT VALUE IS 500 MILLI-SECONDS. 
sWAIT FOR BMP TO BEGIN EXECUTION. 

sPURGE THE FIFO, SAVING ANY BMP CODES. 
sABORT THE TEST IF THE FIFO DID NOT CLEAR. 


ad 
s Report the error if eny BMP codes were found. 


i> 
MOV BMPCOP ,R2 sGET THE CONTENTS OF THE POINTER TO THE BMP Q. 
MOV BrP COs .RS sGET THE START ADORESS OF THE QUEUE. 
chp R2,R3 sSEE IF THE POINTER WAS MOVED FROM THE BASE. 
BEQ 608 sEXIT NO CODES IN THE QUEVE. 


1° 
; There is et least one BP code in the queve. Report the errer. 


ge 
ges eve, BE GE CEe eon, OS lt eee" 
@€N0902 .R1 "gp THE MESSAGE TO BE REPORTED. 
enor 0901 ,EM0901 , ER9OSO1 >>>>> ERROR GO9O1 <<ccc, 
Rap CeeRoFr 
-wORD 89901 





rn 
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HARDWARE TEST 

011205 
017450 
000405 


012737 
004737 


005037 


5538 027466 
5539 027474 


104401 


-— 








- BMPCHK - 


caoeae 003770 5S0$: 


022456 
002352 


608: 


MOV 
JSR 


CLR 
ENDTST 





60% 


902. ,ERRNBR 
PC, TSABRT 


CTRLCF 


SEQ 0144 


- WORD 
- WORD 


M0901 
ER9301 









;SET >>>>> ERROR @0902 <<<cc, 
sREPORT NON-TEST RELATED ERROR. 


sINDICATE THAT WE COMPLETED THE TEST. 


L10036: 
TRAP CSETST 
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-— 


027570 
027574 
027576 
027602 
027606 
027610 
027614 


027616 
027624 
027630 


027632 
027640 
027644 
027644 


000012 
012737 
012737 
012737 
012737 
012737 


012701 


012701 
010214 
004737 
004737 
103011 
020127 
003015 


012737 
004737 
000423 


012737 
012701 


104460 


- BMPCHK - 


000012 
177777 
000001 
011272 
016470 


005670 
000040 


002244 
020340 


000062 


022330 
020340 


000050 


001753 
021622 


001751 
011336 





002326 
002352 
003766 
003772 
003774 


003770 


003770 


.SBTTL HARDWARE TEST - SKSELF - 
2O¢ €£6£64606646466 600666060666 066464666060646666606 0466646600666 646066606646 066464666666464666460646666 
38 - Skip Self-test Test - 
38 This test verifies that the DUT skips the self-test within the 
34 time allowed, and that the fifo contains the correct codes after its 
3% completion. 
3% 
Po > 08060000 006006 064604066 0606646646 6464604606 66000464460460646064646446460660604644640646 044606406464 6444% 
BGNTST . 
10:: 
TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (10) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV €M1001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSOS,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out occurs, then exit this test. 


MOV #3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 

MOV #BITOS,.R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA ,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 


3¢ 

; Determine if the DUT takes too short or too long a time to skip the self-test 
; Set-up a time-out of 50 milli-second, if MR is clear in less than 10 milli 

; -second, or greater than 50 milli-seconds, report the error. 

8 


MOV #50. .R1 sTIME-OUT VALUE IS SO MILLI-SECONDS. 

MOV R2,(R4) sSET THE DUT MASTER RESET BIT. 

JSR PC,SKPSTS sWRITE THE SKIP SELFTEST CODES TO THE DUT. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BCC 2$ ;GO REPORT ERR IF SKIPPING STEST TOOK TNO LONG. 
CMP R1,040. 

BGT 43 ;GO REP ERR IF SELFTEST COMPLETED IN < 10 MS. 


3° 
; Self-test completed within 10 milli-sec to 50 milli-seconds. 
Verify that the self-test codes in the fifo are “good” codes ,ie the DUT 
; successfully completed the self-test. 
; This subroutine reports errors with numbers >>>>> 1003 thru 1007 <<<<<, 


. MOV #1003. ,ERRNBR ;SET ERROR NUMBER TO 1003. 
JSR PC, .RSTRPT ;CHECK SELF-TEST CODES IN THE FIFO. 
BR 60$ sEXIT TEST. 
3* 
; Error reports: 
go 
sReport Skip Self-test took too long. 


2s: MOV #1001. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 
MOV 9€M1002,R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR @1001 <<<<< 


TRAP CSERROR 


SEQ 0145 





HAROWARE TEST 


5600 027646 
5601 


5608 027666 

5609 027674 

5610 

5611 027700 

5612 

5613 027704 
027704 
027704 





000414 
012737 
012701 


104460 
000405 


012737 
004737 


005037 


104401 


SEQ 0146 
- SKSELF - 
BR 60$ sEXIT THE TEST. 
. sReport Skip Self-test completed too soon. 
001752 003770 4!: MOV #1002. ,ERRNBR sSET THE ERROR NUMBER IN THE ERROR TABLE. 
011423 MOV £41003, R1 ;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #1002 <<<<< 
TRAP CSERROR 
BR 603 sEXIT THE TEST. 
001753 003770 50$: MOV #1003. ,ERRNBR ;SET ERROR NUMBER. 
022456 JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 
002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
L10037: 





(sss 
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TRAP CSETST 
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r-— 


027706 
027706 


027706 
027714 
027722 
027730 
027736 


027744 
027750 
027754 
027756 
027762 
027766 


027770 
027772 


027776 
030002 
030006 
030010 
030014 
030020 


030022 
030026 
030030 
030034 
030036 
030040 
030044 
030050 





000013 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
004737 
103044 


010214 
004737 


012701 
012702 
010203 
013704 
004737 
103020 


012701 
005003 
004737 
103012 
010105 
012701 
052703 
004737 


- SKSELF - 


000013 
177777 
000001 
011501 
016470 


005670 
000040 


002244 
020340 


022330 


000005 
020000 


002244 
020340 


000017 
020340 
000001 


020000 
020340 





002326 
002352 
003766 
003772 
003774 


Wednesday 08-May-85 10:14 Page 112 


-SBTTL HARDWARE TEST - DFSKST - 

3¢¢ SRESERHEEEERESEEEEREESEE EEE REEREDEEEEDEDEOREEEDOEEDEDEDEDEEEEEEEEEREREREEE 
34 - Diagnostic fail bit, skip self-test test - 

34 This test verifies that the diagnostic fail bit of the DUT, correctly 
3% changes state as the on-boared selftest is skipped. 

i-- PRCRREESEEEEAERAASEEESEAESEEEAEAEAEREEEEEEEEEDEDEEEEEEDEEEEEEEEDERDREEEREEE 


BGNTST 


TNUM == TNUM + 1 


T1i:: 
s INCREMENT THE ASSEMBLY TIME — COUNTER. 
1 


MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. 1) 

MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV @€M1101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSO3,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


7¢ 
; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out occurs, then exit this test. 


MOV #3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 

MOV #BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 


3¢ 
; Reset the DUT, skip the self-test. 


= 
MOV 
JSR 


3¢ 


R2,(R4) 
PC ,SKPSTS 


sSET THE DUT MASTER RESET BIT. 
sWRITE THE SKIP SELFTEST CODES TO THE DUT. 


; Set time out of 5 milli seconds, wait for Diag_fail bit to set. 
; If time-out occurs go report the error. 


MOV #5,R1 sTIME-OUT VALUE IS 5 MILLI-SECONDS. 

MOV #B8IT13,R2 sWAITING FOR DIAGNOSTIC FAIL BIT. 

MOV R2,R3 sWAITING FOR BIT TO SET. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_DF BIT TO CLEAR. 

BCC 4$ sIF DIAG_FAIL DID NOT SET, GO REPORT ERROR. 


+ 
+ Set time-out of 15 milli-secs, wait for Diag Fail to clear. 


Verify the Diag fai 


> report the error. 
bit is in a stable state before continuing. 


Loop 


back if the state was transitory, using the remainder of the 15 ms time-out. 


3 
; If time-out occurs 


MOV #15. ,R1 sTIME-OUT VALUE IS 15 MILLI-SECONDS. 
2s CLR R3 sWAITING FOR BIT TO CLEAR. 
JSR PC ,MSLGET sWAIT FOR DUT_CSR_DF BIT TO CLEAR. 
BCC 4$ sIF DIAG_FAIL DID NOT CLEAR, GO REPORT ERROR. 
MOV R1,R5 sSAVE THE REMAINING TIME-OUT VALUE. 
MOV #1,R1 sSET TIME-OUT OF 1 MILLI-SECOND. 
BIS #B1IT13,R3 sWAIT FOR BIT TO SET. 
JSR PC ,MSLGET sDOUBLE CHECK TO ELIMINATE NOISE PROBLEMS. 








SEQ 0147 
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HARDWARE TEST - OFSKST - 


030054 103016 
030056 010501 
030060 000762 
5674 se 


5676 a 


030062 012737 002115 003770 4$: 
030070 012701 011742 


030074 
104460 


030074 
030076 000405 
012737 


030100 
030106 004737 
005037 


030112 
030116 


030116 * 
030116 104401 


002116 003770 50$: 


022456 


002352 60$: 


— 
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BCC 60$ 
MOV RS,R1 
BR es 


; Error reports: 


sEXIT IF DIAG_FAIL BIT STILL CLEAR. 
sPASS THE REMAINING TIME-OUT VALUE. 
sLOOP TO CHECK AGAIN. 


sReport Diagnostic fail bit bad. 
MOV 


#1101. ,ERRNBR 


MOV €M1205,R1 
ERROR 

BR 60$ 

MOV #1102. ,ERRNBR 
JSR PC, TSABRT 

CLR CTRLCF 

ENDTST 


;SET THE ERROR NUMBER IN THE ERROR TABLE. 
sSELECT ERROR MESSAGE. 
sREPORT ERROR. >>>>> ERROR $1101 <<<<< 


TRAP CSERROR 
sEXIT THE TEST. 
sSET THE ERROR NUMBER FOR TSABRT RTN. 
sREPORT NON-TEST RELATED ERROR. 
sINDICATE THAT WE COMPLETED A TEST. 
L10040: 
TRAP CSETST 
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HARDWARE TEST 


— 


030120 
030120 


030120 
030126 
030134 
030142 
030150 


030156 
030162 
030166 
030170 
030174 
030200 


030202 
030206 
030210 
030214 
030216 
030222 
030224 
030230 
030232 
030236 


030240 
030244 


030246 
030254 
030260 
030260 





000014 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
004737 
103062 


012701 
010214 
004737 
103030 
012702 
160102 
020227 
002431 
020227 
002434 


032714 
001406 


012737 
012701 


104460 


- SELFTS - 


000014 
177777 
000001 
011525 
016470 


005670 
000040 


002244 
020340 


005670 
020340 
005670 
000062 
000764 


020000 


002264 
011742 


-SBTTL HARDWARE TEST - SELFTS - 


FO SREKEERERASESEREREAEAKEREAEEAEAAAAAEEEAEEEE RE SEREEEEEEEEREEEEEEEEEEEEEE RE EESD 


003770 


34 - Self-test Test - 
3% This test verifies that the DUT’s Self-Test executes within the 
3% time allowed, and that the fifo contains the correct codes after its 
3* completion. 
3% 
| alellllaceceatedachtehtadecehate hath tL L LLL LLL LTT TTT LTT TT TTT TTT TTT TTT TTT TTT TTT 
BGNTST -_ 
TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM ;SET UF THE TEST NUMBER. (12) 
MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #€M1201,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
MOV @EROSO3,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 


3+ 
; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
; If time-out occurs, then exit this test. 


MOV #3000. ,R1 ;TIME-OUT VALUE IS 3.0 SECONDS. 

MOV @BITOS ,R2 sWAITING FOR MASTER RESET BIT. 

CLR R3 sWAITING FOR BIT TO CLEAR. 

MOV CSRA,R4 sBIT IS IN THE DUT’S CSR. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 


7¢ 

; Determine if the Self-test takes too short or too long a time to complete. 
; Set-up a time-out of 3 second, if MR is clear in less than 1/2 second, or 
+ greater than 3 seconds, report the error. 


MOV #3000. ,R1 sTIME-OUT VALUE IS 3.0 SECONDS. 

MOV R2,(R4) sSET THE DUT MASTER RESE™ BIT. 

JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
BCC 43 sGO REPORT ERROR SELFTEST TOOK TOO LONG. 

MOV #3000. ,R2 

SUB R1,R2 sCALCULATE @ OF MS SELFTEST TO COMPLETE. 

CMP R2,@50 
BLT 6$ -+SELFTEST SKIPPED? YES, GO REPORT ERROR. 

CMP R2,@500. 
BLT 8$ ;GO REP ERR IF SELFTEST COMPLETED IN < 1/2 SEC. 


7+ 
; Self-test completed within lsec to 3 seconds. 
s Check the state of the Diagnostic Fail bit, report error if it is set. 


as 
BIT 
BEQ 


#BIT13,(R4) 
2$ 


sDETERMINE IF THE DIAG_FAIL BIT IS CLEAR. 
;SKIP ERROR REPORT IF BIT IS CLEAR. 


sReport Diagnostic fail bit bad. 


MOV #1204. ,ERRNBR ;SET ERROR NUMBER TO IN ERROR TABLE. 
MOV #EM1205,R1 ;SELECT THE ERROR MESSAGE. 
ERROR 3 >>>>> ERROR #1204 <<<<< 


TRAP CSERROR 


3¢ 
; Verify that the self-test codes in the fifo are “good” codes ,ie the DUT 
; successfully completed the self-test. 


; This subroutine reports errors with numbers >>>>> 1205 thru 1209 <«<<<. 








SEQ 0149 
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HARDWARE TEST 


$745 030262 
5746 030270 
5747 030274 


5752 030276 
5753 030304 
5754 030310 

030310 
S755 030312 


5758 030314 
5759 030322 
5760 030326 

030326 


5763 030330 
5764 030336 
5765 030342 

030342 
5766 030344 


S768 030346 
5769 030354 


5771 030360 
5773 030364 


030364 
030364 


— 


012737 
004737 
000431 


012737 
012701 


104460 
000422 
012737 
012701 
104460 
012737 
012701 


104460 
000405 


012737 
004737 


005037 


104401 


- SELFTS - 


002265 
021622 


002261 
011544 


002262 
011706 


002263 
011630 


002272 
022456 


002352 


003770 


003770 


003770 


003770 


003770 


2s: 


3* 






MOV #1205.,ERRNBR ;SET ERROR NUMBER TO 1205. 
JSR PC, ,RSTRPT sCHECK SELF-TEST CODES IN THE FIFO. 
BR 60$ sExIT TEST. 


; Error reports: 


4$: 


6$: 


50$: 


60$: 





sReport Self-test cont too —_ to complete. 
MOV #1201. ,ERRNBR T THE ERROR NUMBER IN THE ERROR TABLE. 


MOV 9€M1202, Ri sSELECT ERROR MESSAGE. 

ERROR sREPORT ERROR. >>>>> ERROR #1201 <<<<< 
TRAP CSERROR 

BR 60$ sEXIT THE TEST. 


sReport Self-test did not execute after DUT rese 
MOV #1202. ,ERRNBR ;SET THE ERROR NUMBER’ IN ERROR TABLE. 
MOV 0€M1204,R1 s;SELECT ERROR MESSAGE. 
ERROR sREPORT ERROR. >>>>> ERROR #1202 <<<<< 
TRAP CSERROR 


sReport Self-test competed too soon. 
MOV #1203. ,ERRNBR ;SET THE ERROR NUMBER IN THE ERROR TABLE. 


MOV #€M1203,R1 s;SELECT ERROR MESSAGE. 

ERROR sREPORT ERROR. >>>>> ERROR #1203 <<<<< 
TRAP CSERROR 

BR 60$ sEXIT THE TEST. 

MOV #1210.,ERRNBR ;SET THE ERROR NUMBER FOR TSABRT RTN. 

JSR PC, TSABRT sREPORT NON-TEST RELATED ERROR. 

CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 

ENOTST 


L10041: 
TRAP CSETST 
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HARDWARE TEST 


— 


$775 
5776 
$777 
5778 


030366 
030366 


030366 
030374 
030402 
030410 
030416 
030424 


030432 
030436 
030442 
030444 
030450 
030454 


030456 
030460 
030464 
030470 
030474 
030476 
030502 
030506 
030510 
030514 
030516 
030520 
030524 
030530 
030532 
030536 
030540 
030542 
030544 


000015 
012737 
012737 
012737 
012737 
012737 
012737 


012701 
012702 
005003 
013704 
004737 
103120 


010214 
004737 
012701 
004737 
103110 
005237 
012700 
005003 
013704 
011402 
100077 
042702 
020227 
001002 
012703 
005300 
001365 
005703 
100466 


- SELFTS - 


000015 
177777 
000001 
011766 
016470 
002425 


005670 
000040 


002244 
020340 


022330 
000764 
020340 


003770 
000010 


002246 
007402 
170001 
177777 


002326 
002352 
003766 
003772 
003774 
003770 


-SBTTL HARDWARE TEST 


3+ SEREEREAEEERERESARAAEAERESAEEASSAAERAEESAEEEEEEEEEEEEEEEEEEEEEEERRDRADEERES 


i-- SREREEEEREREEEAEAAAEERAAEERESEEAEESEEREAAEREEASEAERAREREARARERERERELEE EERE 


This test verifies that the DUT will report selftest errors via the 


fifo. 


This is accomplished vie a software ‘hook’ in the self-test, which 


- STFAIL - 


- Self-test fail test - 


And that the Diagnostic fail bit will indicate the error. 


forces a “Proci to ram error” to be placed in the fifo. 


BGNTST 


TNUM == TNUM + 1 


@TNUM, TSTNUM 


#-1,CTRLCF 
#1,ERRTYP 


#E€M1301, ERRMSG 
#EROSO3, ERRBLK 
#1301. ,ERRNBR 


T13:: 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER. (13) 
sINDICATE THAT WE ARE WITHIN A TEST. 

sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
sSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
sSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
;SET ERROR NUMBER TO 1301. 


3¢ 
; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
If time-out occurs, then exit this test. 


#3000. ,R1 


CSRA,R4 
PC ,MSLGET 
50$ 


sTIME-OUT VALUE IS 3.0 SECONDS. 
sWAITING FOR MASTER RESET BIT. 
sWAITING FOR BIT TO CLEAR. 

sBIT IS IN THE DUT’S CSR. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sGO REPORT ERROR IF MR DID NOT CLEAR. 


7+ 
; Reset the DUT, check for rom version 0. 
If Version 0 is found then exit this test. 


2s: 


4$: 


3¢ 
; Reset the DUT, delay for 25 milli-seconds before writing the Fail_self_test 


R2,(R4) 
PC,SKPSTS 
#500. ,R1 
PC ,MSLGET 
50 


50 

#7402 ,R2 

> al 
4 


sRESET THE DUT. 

sSKIP THE SELFTEST. 

sPASS TIME-OUT VALUE OF S00 MILLISECS. 
sWAIT FOR MR BIT TO CLEAR. 

sGO REPORT ERROR IF TIME-OUT OCCURRED. 
sSET ERROR NUMBER TO 1302. 

sSET MAXIMUM READ COUNT. 

sCLEAR THE ROM VERSION O FLAG. 


sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 


sREAD A CODE FROM THE FIFO. 
sGO REPORT ERROR IF THE FIFO IS EMPTY. 


sREMOVE THE LINE NUMBER AND —_— 


sCOMPARE WITH ROM VERSION #0 CODE. 

sROM VERSION #0? NO, SKIP SETTING FLAG. 
sYES, SET THE ROM VERSION @0 FLAGS. 
sDECREMENT MAX READ COUNTER. 

sLOOP IF 8 CODES HAVE NOT BEEN READ. 
sCHECK THE ROM VERSION #1 INDICATOR. 


sROM VERSION 0 IN EITHER PROCESSOR? YES, EXIT. 


; code to TBUFFCT register on channel 0. 























SEQ 0151 
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HAROWARE TEST 


5831 030546 
5832 030554 


5840 030576 


5871 030702 
5873 030706 
5874 030712 

030712 
5875 030714 
5877 030716 
5879 030722 
5881 030726 


030726 
030726 


| 
= 





012777 
912704 
¥04737 
012777 


012701 


104460 
000402 


004737 
005037 


104401 


- STFAIL - 
000040 151470 
000031 


020300 
146314 


003770 
003720 
000040 


002244 
020340 


003770 
020000 


003770 
000010 


002246 


007400 
170231 


003770 
012012 


022456 
002352 


151470 


3¢ 
; Verify the diagnostic fail bit is set, indicating the error. 
; Report error if diagnostic fail bit is clear. 


3¢ 


; Remove the 8 self-test codes form the fifo, and verify that at least 
; one is a Proci to ram error code (231). 


6$: 


8$: 


sRep 
10$: 


50$: 
60$: 


INC 
BIT 
BEQ 


@BITOS,@CSRA 
#25. ,R4 
PC .DELAY 


#146314, 8TXBFCA ;WRITE THE FAIL SELF-TEST CODE TO TBUFFCT REG. 


3¢ 
; Wait up to 2 seconds for the self-test to complete. 
; If time-out occurs, then exit this test. 


ERRNBR 
#2000. ,R1 
#BITOS ,.R2 
R3 


CSRA,R4 
PC ,MSLGET 
50$ 


ERRNBR 
#B1T13,(R4) 
10$ 


NC 
ort Self-test error eat 


INC ERRNBR 
MOV #8.,RO 
CLR Ri 

MOV RBUFA,R4 
MOV (R4),R2 
BPL 50$ 

BIC #7400,R2 
CMPB =R2,#170231 
BNE 8$ 

INC R1 

DEC RO 

BNE 6$ 

TST Ri 

BNE 60$ 

I ERRNBR 
MOV 9€M1302,R1 
ERROR 
BR 60$ 

JSR PC, TSABRT 
CLR CTRLCF 
ENDTST 




























SEQ 0152 


sSET DUT MASTER RESET BIT, SELECT CHANNEL 0. 
sPASS DELAY PERIOO OF 25 MILLI SECS. 
sWAIT FOR SELFTEST TO INITIALISE. 


sSET ERROR NUMBER TO 1303. 

sTIME-OUT VALUE IS 2.0 SECONDS. 

sPASS THE BIT MAP OF THE BIT TO TEST. 
sSET UP THE EXPECTED STATE. 

sBIT IS IN THE DUT’S CSR. 

sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
sGO REPORT ERROR IF MR DID NOT CLEAR. 


sSET ERROR NUMBER TO 1304. 
sCHECK THE STATE OF THE DIAG_FAIL BIT. 
sGO REPORT ERROR IF DIAG_FAIL BIT CLEAR. 


sSET ERROR NUMBER TO 1305. 

sSET MAXIMUM READ COUNT. 

sCLEAR THE CORRECT CODE COUNTER. 

sGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
sREAD A CODE FROM THE FIFO. 

sGO REPORT ERROR IF THE FIFO IS EMPTY. 
sREMOVE THE LINE NUMBER FROM THE CODE. 

sIS IT THE CORRECT ERROR CODE?. 

sSKIP NEXT INSTRUCTION, IF NOT A 231 CODE. 
sINCREMENT COUNTER. 

sDECREMENT MAX READ COUNTER. 

sLOOP IF 8 CODES HAVE NOT BEEN READ. 

sWERE ANY 231 CODES FOUND?. 

sYES, THEN EXIT. 

sNO, SET ERROR NUMBER TO 1306 AND REPORT ERROR. 


sSELECT ERROR MESSAGE. 
sREPORT ERROR. >>>>> ERROR <<<<< 


TRAP CSERROR 
sEXIT THE TEST. 
sREPORT NON-RELATED TEST ERROR. 
sINDICATE THAT WE COMPLETED THE TEST. 


L10042; 
TRAP CSETST 
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SEQ 0153 
HARDWARE TEST - STFAIL - 
5883 
5884 
5885 -SBTTL HARDWARE TEST - ROMVER - 
5886 ASM TT CITT ititi i iii tititi tii titi iit iit titi TTT TT TTT TT TTT TTT TTT TT TTT TTT TTT TTT TT 
5887 3% - Rom Version Test - 
5888 ;% This test verifies that the DUT's Self-Test places valid Rom version 
5889 3* numbers in the fifo after it has been skipped. The Rom version numbers 
5890 3% will be reported (on the first pass only), if an affirmative answer 
ooee 34 was given to the software P-table question. 
3% 
53893 S—— BOE O9NOS OOO OOOO O4OOOEEEOO4SOEOOOOES OEE EEEDOEOEESEOOOEEEREEEERERERE 
5894 030730 BGNTST 
030730 T14:: 
5895 000016 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
5896 030730 012737 000016 002326 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (14) 
5897 030756 012737 177777 002352 MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
5898 030744 012737 000001 003766 MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
5899 030752 012737 012051 003772 MOV #E€M1401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
ney 030760 012737 016470 003774 MOV ®EROSO3,ERRBLK ;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
1 i+ 
5902 ; Wait up to 3 seconds for the DUT Master Reset bit to clear. 
tee] ; If time-out occurs, then exit this test. 
gs 
$905 030766 012701 005670 MOV #3000. ,R1 ;TIME-OUT VALUE IS 3.0 SECONDS. 
5906 030772 012702 000040 MOV eB ITOS ,R2 sWAITING FOR MASTER RESET BIT. 
5907 030776 005003 CLR R3 sWAITING FOR BIT TO CLEAR. 
5908 031000 013704 002244 MOV CSRA,R4 ;BIT IS IN THE DUT‘S CSR. 
5909 031004 004737 020340 JSR PC ,MSLGET sWAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ee 031010 103131 BCC 50$ sABORT THE TEST IF MR DID NOT CLEAR. 
3¢ 
4d | ; Set the Master Reset bit, and skip the self test. 
1 3° 
5914 031012 010214 MOV R2,(R4) ;SET THE MASTER RESET BIT. 
5915 031014 004737 022330 JSR PC,SKPSTS ;SKIP THE SELF TEST. 
5916 031020 012701 005670 MOV #3000. ,R1 ;TIME-OUT VALUE IS 3.0 SECONDS. 
5917 031024 004737 020340 JSR PC .MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 
ay 031030 103121 BCC 50$ ;ABORT THE TEST IF MR DID NOT CLEAR. 
3¢ 
5920 ; Remove characters from the FIFO until either; 
$921 ; Ca) The FIFO is purged, go report the error. 
5922 ; (bd) The maximum try counter is zero, go report the error. 
5923 ; (c) PROC_1‘s rom version number was found before PROC_2's, go report error. 
pee ; (d) Both ROM version numbers have been found. 
92 s- 
5926 031032 012705 000040 MOV @4¢NUMLNS RS ;SET MAXIMUM TRY COUNTER. 
5927 031036 012703 000143 MOV 099. ,R3 ;SET AN INVALID ROM VERSION NUMBER FOR PROC_1. 
5928 031042 010304 MOV R3,R4 ;SET AN INVALID ROM VERSION NUMBER FOR PROC_2. 
5929 031044 012737 002571 003770 MOV #1401. ,ERRNBR ;SET THE ERROR NUMBER TO 1401. 
pene 031052 012701 012101 MOV €M1402,R1 ;SELECT MESSAGE TO BE REPORTED IF FIFO EMPTY. 
1 
5932 031056 017702 151164 2s: MOV ORBUFA ,R2 ;READ THE NEXT CHAR FROM THE FIFO. 
os 031062 100077 BPL 12$ ;GO REPORT ERROR IF FIFO EMPTY. 
3° 
peor ; Check if the read date is ea BMP code. 
6 3° 
5937 031064 012700 000301 MOV @301,R0 ;SET-UP A BIT MASK OF A BMP CODE. 
5938 031070 040200 BIC R2,RO0 ;TRY TO CLEAR THE BIT MASK WITH THE READ DATA. 





a 
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SEQ 0154 
HAROWARE TEST - ROMVER - 
5939 031072 001003 BNE 4S ;BRANCH IF NOT A BMP CODE. 
5940 031074 004737 022262 JSR PC ,SAVBMP ;SAVE THE BMP CODE ON THE QUEUE. 
5941 031100 000435 BR 8$ : 
5942 :¢ 
tony ; Check if the read dete is ea self-test code. 
3° 
5945 031102 012700 000201 4$: MOV #201 ,RO ;SET-UP A BIT MASK OF A SELFTEST CODE. 
5946 031106 040200 BIC R2,R0 ;TRY TO CLEAR THE BIT MASK WITH THE READ DATA. 
todd 031110 001431 BEQ 8$ ;BRANCH IF IT IS A SELFTEST CODE. 
5949 3¢ 
peee ; The read data is a ROM version number, determine which one it is. 
1 s- 
$952 031112 032702 000002 BIT @B1T1,R2 ;CHECK THE PROCESSOR NUMBER BIT IN THE CODE. 
5953 031116 001407 BEQ 6$ sBRANCH IF IT IS PROC_1 ROM VERSION NUMBER. 
5954 031120 010204 MOV R2,R4 sSAVE PROC_2 ROM VERSION NUMBER. 
5955 031122 042704 177603 BIC #177603,R4 ;CLEAR ANY UNWANTED BITS. 
5956 031126 000241 CLC sCLEAR THE CARRY BIT. 
5957 031130 006004 ROR R4 ;SHIFT THE CODES ALONG TO GET THE ROM 
5958 031132 006004 ROR Ra ; VERSION NUMBER IN THE LOW 5S BITS. 
5959 031134 000417 BR 8$ 3 
5960 031136 010203 6$: MOV R2,R3 ;SAVE PROC_1 ROM VERSION NUMBER. 
5961 021140 042703 177603 BIC #177603,R3 ;CLEAR ANY UNWANTED BITS. 
5962 031144 000241 CLC ;CLEAR THE CARRY BIT. 
5963 031146 006003 ROR R3 sSHIFT THE CODE ALONG TO GET THE ROM 
5964 031150 006003 ROR R3 ; VERSION NUMBER IN THE LOW 5 BITS. 
5965 031152 020427 000143 CMP R4, 099. ;CHECK IF WE HAVE RECEIVE PROC_2 ROM CODE. 
eee 031156 001016 BNE 10$ 3GO REPORT BOTH ROM VERSION NUMBERS. 
3¢ 
5968 ; Received ROM version numbers out of sequence. 
oo ; ie, Proc_i's ROM version number found in the fifo before Proc_2's 
5971 031160 012701 012167 MOV €M1403,R1 sSELECT THE ERROR MESSAGE TO BE REPORTED. 
5972 031164 012737 002572 003770 MOV #1402. ,ERRNBR sSET THE ERROR NUMBER. 
ashy 031172 000433 BR 12$ :GO REPORT ERROR. 
5975 031174 005305 83: DEC RS sDECREMENT THE MAX TRY COUNTER. 
5976 031176 001327 BNE 2s sLOOP TO GET THE NEXT CHAR FROM THE FIFO. 
5977 031200 012701 012242 MOV @EM1404,R1 sSELECT THE ERROR MESSAGE TO BE REPORTED. 
5978 031204 012737 002573 003770 MOV #1403. ,ERRNBR ;SET THE ERROR NUMBER. 
or 031212 000423 BR 12$ ;GIVE UP, GO REPORT ERROR. 
3;¢ 
5981 : If this is the first pass, and software P-teble question was answered YES, 
tee | ; then report the rom version numbers to the operetor. 
- 
5984 031214 032737 000001 002226 10%: BIT > aie ;CHECK ON THE STATE OF THE SOFTWARE SWITCH. 
5985 031222 001431 BEQ sEXIT IF NO ROM VERSION PRINTOUT WAS REQUESTED. 
5986 031224 023727 002332 000001 CMP PASCNT, 1 ;CHECK IF THIS IS THE FIRST PASS. 
5987 031232 003025 BGT 603 sEXIT IF ROM VERS HAVE ALREADY BEEN REPORTED. 
5988 031234 PRINTB @€F1401,R3,R4 s;PRINT THE ROM VERSION NUMBERS. 
031234 010446 MOV R4,-C(SP) 
031236 010346 MOV R3,-(SP) 
031240 012746 004214 MOV @€F 1401, -( SP) 
031244 012746 000003 @3,-(SP) 





031250 010600 
031252 104414 
031254 062706 000010 


eo 





< 
6013 031314 
031314 

6014 
6015 031314 
6016 031322 


-SBTTL HARDWARE TEST 
$O% SHREREEESESEES SESE SAESESESESEAEEEDEERESESESEEESEELESEREDESEDEEESOEEEDEDEOEE 


- Device Register Word Access Read end Write Test - 


3% 
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3% 
s# This test verifies thet the device registers can be read and written 


: correctly using word accesses. 


Sr > 86606806060 0666 06066006600 06006 606008600006 0000066000006 06 0004600 0000000006000008 


BGNTST 


TNUM == TNUM + 1 


@TNUM, TSTNUM 
#-1, CTRLCF 


T1iS:: 
sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
sSET UP THE TEST NUMBER. (16) 
sINDICATE THAT WE ARE WITHIN A TEST. 


SEQ 0156 


6017 031330 
6018 031336 
6019 031344 
6020 031352 
6021 031356 


#1,ERRTYP 
#1601. ,ERRNBR 
@€M1604 , ERRMSG 
ERSMRF 


sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 

sSET UP ERROR NUMBER IN THE ERROR TABLE. 

sSET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
sCLEAR THE ERROR SUMMARY FLAGS. 

#ERCNTB,RO 


PC ,CLRi6W sCLEAR THE ERROR COUNTER TABLE. 


3¢ 
s Reset the DUT to e known state, do not remove the stetus codes from the fifo. 
s Clear TX and RX interrupt enable bits in the CSR. 

s This subroutine reports errors >>>>> 1601 <<<<<, 


031366 004737 021456 , JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
031372 103402 BCS .*6 sFATAL curt war tant NO, CONTINUE WITH TEST. 


031374 000137 031516 JMP 60% sYES, 


003772 


3¢ 
s Verify read/write capability to indirect eddrese field of CSR 


3 ~ 

031400 005237 
031404 012702 
031410 013704 
031414 010214 2s: 
031416 011401 

042701 

020102 

001406 


012737 016712 


sSET THE ERROR REPORT NUMBER TO 1602. 
sSET LOOP COUNT. 
sGET CSR ADORESS. 
sWRITE COUNT TO CSR. 
sREAD BACK THE CONTENTS OF THE CSR 
sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
sCHECK FOR CORRECT DATA WRITTEN/READ. 
BEQ sIS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 
sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).° 
Mov @ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR RS sCAUSE REPORT OF LINE 0. 
ERROR s >>>>> ERROR @ 1602 <<<<< 
TRAP CeoERROR 


4s: DEC R2 sDECREMENT LOOP COUNT/IND.ADO.REG ADORESS. 
BGE 26 sLO0P BACK TO TEST NEXT ADORESS IF NOT DONE. 
3° 


1 Write end verify 16 dete petternes in ell veed bite of ell istere en ell 
1 ective lines. Before writing each pettern, cleer ell the bite. 
3 REGTST reutine reports errors with numbers »>>>> ERROR 1603 - 1605 <«c«c<. 


t- 
In cReMBO sSET THE ERROR MUPWER TO 1603. 
CLR R3 sIMDICATE THAT WORD ACCESSES ARE TO GE USED. 
mOv @2 .R4 sINDICATE R/U ACCESS. CLEAR FIRST. 
JSR PC .REGTST iMRI TE AMD VERIFY DATA PATTERNS. 





pr 


SSS SS AS A a SS SS 
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HARDWARE TEST - REGWRW - 

















SEQ 0157 


6059 ; Write and verify 16 date patterns in all used bits of ell registers on ell 
6060 + active lines. Before writing each pattern, set all the bits. 
6061 F REGTST routine reports errors with numbers »>>>>> ERROR 1606 - 1608 <<<<<, 
6062 is 
6063 031466 012737 003106 003770 MOV #1606.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
6064 031474 00500? CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
6065 031476 00540. NEG R4 sINDICATE R/W ACCESS, SET FIRST. 
core 031500 004737 021220 JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
6 i’ 
6068 ; Print error summary reports if necessary. 
oe s The following routine reports errors with number >>>>> ERROR @ 1609 <<<<< 
0 3- 
6071 031504 012737 003111 003770 MOV #1609. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 
6072 031512 004737 021430 JSR PC .REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
6073 031516 005037 002352 608: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
6074 031522 ENDTST 
031522 L10044: 
031522 104401 TRAP CSETST 
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031524 
031524 


031524 
031532 
031540 
031546 
031554 
031562 
031566 
031572 


031576 
031602 
031604 


031610 
031614 
031620 
031624 
031630 
031632 
031634 
031640 
031642 


031644 
031652 
031654 
031656 
031656 
031660 
031662 


031664 
031670 
031672 
031676 


000020 
012737 
012737 
012737 
012737 
012737 
005037 
012700 
004737 


004737 
103402 
000137 


005237 
012702 
013704 
042714 
050214 
011401 
042701 
020102 
001406 


012737 
005003 
005005 


104460 
005302 
002360 


005237 
005003 
012704 
004737 


- REGWRM - 


000020 
177777 
000001 
003245 
012513 
002462 
002464 
020200 


021456 
031732 


003770 
000017 
002244 
000017 


177760 


016712 


003770 


000001 
021220 





002326 
002352 
003766 
003770 
003772 


003774 


-SBTTL HARDWARE TEST - REGWRM - 

FOS SHEREKEKAKSESKEKEKEKEASEHEEEEHAEEEAEEEKEKEKEEEEEKEDEREREEEEEKEDEDEEEEEEEEEEE 
3¢ - Device Register Word Access Read/Modify/Write Test - 

3% 

s* This test verifies thet the device registers can be written correctly 

3# using word read/modify/write accesses. 


3% 
F-- SRAKAREKSAEASKESHRES HASHES ASEAEEEEAEAEEEEEKEKEREEEEEEEEEEEEEEEREEEESEEEEEEE 
BGNTST are 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (17) 
MOV @-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #1701.,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV #€M1701,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 


CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV @ERCNTS,RO 
JSR PC ,CLRi6W sCLEAR THE ERROR COUNTER TABLE. 


3¢ 

; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports errors >>>>> 1701 <<<<<, 


JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS .+6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP 60$ sYES, EXIT THE TEST. 
3¢ 
3; Verify read/modify/write capability to indirect address field of CSR 
3° 
INC ERRNBR ;SET THE ERROR REPORT NUMBER TO 1702. 
MOV #17,R2 ;SET LOOP COUNT. 
MOV CSRA,R4 ;GET CSR ADDRESS. 
2s: BIC #17,(R4) sCLEAR THE DUT CSR USING READ/MODIFY/WRITE. 
BIS R2,(R4) sWRITE COUNT TO CSR USING READ/MODIFY/WRITE. 
MOV (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
BIC 0177760, R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
CMP R1,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 
BEQ 4$ 3IS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 
sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 
MOV #E€R1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR RS ;CAUSE REPORT OF LINE 0. 
ERROR 3 >>>>> ERROR @ 1702 <<<<< 
TRAP CSERROR 
4$: DEC R2 s;DECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 
BGE 2s ;LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


; Write and verify 16 date patterns in all used bits of all registers on all 
s active lines using R/M/W. Before writing each pattern, clear all the bits. 
; REGTST routine reports errors with numbers »>>>> ERROR 1703 - 1705 <<<<<. 


INC ERRNBR sSET THE ERROR NUMBER TO 1703. 

CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 
MOV @1,R4 sINDICATE R/M/W ACCESS, CLEAR FIRST. 

JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


SEQ 0158 
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SEQ 0159 
HARDWARE TEST - REGWRM - 

6131 3° 

6132 ; Write and verify 16 data patterns in all used bits of all registers on all 

6133 + active lines using R/M/W. Before writing each pattern, set all the bits. 

saoe ; REGTST routine reports errors with numbers »>>>>> ERROR 1706 - 1708 <<<<<. 

613 3- 

6136 031702 012737 003252 003770 MOV #1706.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

6137 031710 005003 CLR R3 sINDICATE THAT WORD ACCESSES ARE TO BE USED. 

6138 031712 005404 NEG R4 sINDICATE R/M/W ACCESS, SET FIRST. 

ee 031714 004737 021220 JSR PC ,REGTST sWRITE ANC VERIFY DATA PATTERNS. 

61 3¢ 

6141 ; Print error summary reports if necessary. 

ty | F The following routine reports errors with number >>>>> ERROR @ 1709 <<<<< 

614 i= 

6144 031720 012737 003255 003770 MOV #1709.,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 

6145S 031726 004737 021430 JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 

6146 031732 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 

6147 031736 ENOTST 

031736 L10045: 
031736 104401 TRAP CSETST 





-— 
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6149 
6150 
6151 


— 


031740 
031740 


031740 
031746 
031754 
031762 
031770 
031776 
032002 
032006 


032012 
032016 
032020 
032024 


032032 
032036 
032042 
032044 
032046 
032052 
032054 


032056 
032064 
032066 
032070 
032070 
032072 
032074 


032076 
032102 
032106 


000021 
012737 
012737 
012737 
012737 
012737 
005037 
012700 
004737 


004737 
103402 
000137 
012737 


012702 
013704 
110214 
111401 
042701 
020102 
001406 


012737 
005003 
005005 


104460 
005302 
002362 


005237 
012703 
012704 


- REGBRW - 
-SBTTL HARDWARE TEST - REGBRW - 
ze REGEERESEESEREREAAAAAAARERASEARAEAEEEEAEAREEAAEAEEAEREDEEKEEEDREREDEEEEEEEES 
3% - Device Register Byte Access Read and Write Test - 
3% 
s* This test verifies that the device registers can be read and written 
s*# correctly using byte accesses. 
3% 
i-- PERERRESEEEAARERESESEAEEEAEREREREDEK EEE EEEE ODED EEDEOODEEEEEEEEEEDEDEEEE EES 
BGNTST "? 
TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
000021 002326 MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (18) 
177777 002352 MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 
000001 003766 MOV #1 ,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
003411 003770 MOV #1801. ,ERRNBR s;SET UP ERROR NUMBER IN THE ERROR TABLE. 
012570 003772 MOV @EM1801,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
002462 CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
002464 MOV *ERCNTB,RO 
020200 JSR PC, ,CLR1i6W sCLEAR THE ERROR COUNTER TABLE. 
3¢ 
; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 
; This subroutine reports errors >>>>> 1801 <<<<<, 
= 
021456 JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS .+6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
032176 JMP 60$ sYES, EXIT THE TEST. 
003412 003770 MOV #1802. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 1802. 
3* 
; Verify read/write capability to indirect address field of CSR. 
; Use byte accesses. 
s= 
000017 MOV #17,R2 ;SET LOOP COUNT. 
002244 MOV CSRA,R4 ;GET CSR ADDRESS. 
2s: MOVB R2,(R4) sWRITE COUNT TO CSR. 
MOVB (R4),R1 sREAD BACK THE CONTENTS OF THE CSR 
177760 BIC $177760,R1 sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 
CMP R1i,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 
BEQ 4$ ;IS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 
sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 
016712 003774 MOV #ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
CLR R5 sCAUSE REPORT OF LINE 0. 
ERROR ¢ »>>>>> ERROR @ 1802 <<<<< 
TRAP CSERROR 
4$: DEC R2 sDECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 
BGE 23 sLOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 
3¢ 
; Write and verify 16 data patterns in ell used bits of all lower bytes of all 
+ Pegisters on all active lines. Use READ/WRITE accesses. Before writing 
; each pattern, clear all the used bits of all active registers. 
3 REGTST routine reports errors with numbers »>>>>> ERROR 1803 - 1805 <<<«<. 
003770 INC ERRNBR ;SET THE ERROR NUMBER TO 1803. 
177777 MOV #-1,R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
000002 MOV #2,R4 sINDICATE R/W ACCESS, CLEAR FIRST. 








SEQ 0160 
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HARDWARE TEST 
aoe 032112 


6211 032116 
6212 032124 
6213 032126 


6220 032132 
6221 032140 
6222 032142 
6223 032144 


6230 032150 
6231 032156 
6232 032160 


6237 032164 
6238 032172 
6239 032176 
6240 032202 
032202 
032202 


— 





004737 


012737 
005403 
004737 


012737 
005403 
005404 
004737 


012737 
005403 
004737 


012737 
004737 
005037 


104401 


- REGBRW - 


021220 


003416 
021220 


003421 


021220 


003424 
021220 


003427 
021430 
002352 


003770 


003770 


003770 


003770 









JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 
3¢ 


; Write and verify 16 date patterns in all used bits of all wy * bytes of all 
3 registers on all active lines. Use READ/WRITE accesses. Before writing 

: each pattern, clear all the used bits of all active registers. 

; REGTST routine reports errors with numbers »>>>>> ERROR 1806 - 1808 <<<<<. 


52 

MOV #1806.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3¢ 

; Write and verify 16 data patterns in all used bits of all lower bytes of all 
+ registers on all active lines. Use READ/WRITE accesses. Before writing 

; each pattern, set all the used bits of all active registers. 

; REGTST routine reports errors with numbers »>>>>> ERROR 1809 - 1811 <<<<<, 


3- 
MOV #1809.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 


NEG R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
NEG R4 sINDICATE R/W ACCESS, SET FIRST. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3;* 

; Write and verify 16 data patterns in all used bits of all high bytes of all 

; registers on all ective lines. Use READ/WRITE accesses. Before writing 

3 each pattern, set all the used bits of all active registers. 

3 REGTST routine reports errors with numbers >>>>> ERROR 1812 - 1814 <<<<<, 


a 
MOV #1812.,ERRNBR ;SET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC ,REGTST ;WRITE AND VERIFY DATA PATTERNS. 

;¢ 

; Print error summary reports if necessary. 

H The following routine reports errors with number >>>>> ERROR @ 1815 <<<<< 


MOV #1815.,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 


JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
L10046: 


TRAP CSETST 
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6242 
6243 


032204 
032204 


032204 
032212 
032220 
032226 
032234 
032242 
032246 
032252 


032256 
032262 
032264 
032270 


032276 
032302 
032306 
032312 
032314 
032316 
032322 
032324 


032326 
032334 
032336 
032340 
032340 
032342 
032344 


032346 
032352 


004737 
103402 
000137 
012737 


012702 
013704 
142714 
150214 
111401 
042701 
020102 
001406 


012737 


005237 
012703 


- REGBRM - 


000022 
177777 
000001 
003555 
012636 
002462 
002464 
020200 


021456 


032446 
003556 


000017 
002244 
000017 


177760 


016712 


003770 
177777 


002326 
002352 
003766 
003770 
003772 


003770 


003774 





-SBTTL HARDWARE TEST - REGBRM - 
Pe DEI CITI P Tir i rir reer rrr rirririririrtitititit titi titty 


3* - Device Register Byte Access Read/Modify/Write Test - 


i* 
3* This test verifies that the device registers can be read and written 
3# correctly using byte accesses in Read/Modify/Write mode. 


3% 
Fo - SREREAEREAKESASEAKERESEEEASASARAAEAEALALEREEALEREEESOEEDEKEERERESEEEEEE REESE 

BGNTST 

T18: 

TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME. TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (19) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE WITHIN A TEST. 

MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 


MOV #1901.,ERRNBR ;SET UP ERROR NUMBER IN THE ERROR TABLE. 
MOV @€M1901,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 


CLR ERSMRF sCLEAR THE ERROR SUMMARY FLAGS. 
MOV #ERCNTB,RO 
JSR PC ,CLRi6W sCLEAR THE ERROR COUNTER TABLE. 


7? 

; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports errors >>>>> 1901 <<<<<, 

_ 


JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS +6 sFATAL RESET ERROR? NO, CONTINUE WITH TEST. 
JMP 60$ sYES, EXIT THE TEST. 


MOV #1902. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 1902. 
3¢ 
; Verify read/write capability to indirect address field of CSR. 
; Use byte accesses. 
had 


MOV #17,R2 s;SET LOOP COUNT. 

MOV CSRA,R4 sGET CSR ADDRESS. 
2$: BICB #17,(R4) s;CLEAR THE DUT CSR USING READ/MODIFY/WRITE. 

BISB R2,(R4) sWRITE COUNT TO CSR USING READ/MODIFY/WRITE. 

MOVB §(R4),R1 sREAD BACK THE CONTENTS OF THE CSR 

BIC 0177760, Ri sMASK OUT ALL BUT THE IND.ADR.REG FIELD. 

CMP R1,R2 sCHECK FOR CORRECT DATA WRITTEN/READ. 

BEQ 4$ ;IS EXPECTED DATA BAD? NO, SKIP ERROR REPORT. 

sReport “BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (D).” 

MOV #ER1601,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 

CLR R3 sSET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 

CLR RS sCAUSE REPORT OF LINE 0. 

ERROR s »>>>>> ERROR @ 1902 <<<<< 

TRAP CSERROR 

4$: DEC R2 s;DECREMENT LOOP COUNT/IND.ADD.REG ADDRESS. 

BGE 2s sLOOP BACK TO TEST NEXT ADDRESS IF NOT DONE. 


; "write and verify 16 data patterns in all used bits of all lower bytes of all 
3 registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 
; g tthe each pattern, clear all the used bits of all active registers. 


; REGTST routine reports errors with numbers »>>>>> ERROR 1903 - 1905 <«<<<<, 
— 

INC ERRNBR ;SET THE ERROR NUMBER TO 1903. 

MOV #-1,R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 


SEQ 0162 
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HARDWARE TEST 


6297 032356 
6298 032362 


6305 032366 
6306 032374 
6307 032376 


6314 032402 
6315 032410 
6316 032412 
6317 032414 


6324 032420 
6325 032426 
6326 032430 


6331 032434 
6332 032442 
6333 032446 
6334 032452 
032452 
032452 


paar 





012704 
004737 


012737 
005403 
004737 


012737 
005403 
005404 
004737 


012737 
005403 
004737 


012737 
004737 
005037 


104401 


- REGBRM - 


000001 
021220 


0035F*2 
021220 


003565 


021220 


003570 
021220 


003573 
021430 
002352 


003770 


003770 


003770 


003770 








MOV #1,R4 sINDICATE R/M/W ACCESS, CLEAR FIRST. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3+ 

; Write and verify 16 data patterns in all used bits of all high bytes of all 
; registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 

; gthte each pattern, clear all the used bits of all active registers. 


3 REGTST routine reports errors with numbers »>>>>> ERROR 1906 - 1908 KKEKKK, 
= 
MOV #1906.,ERRNBR ;SET UP ERROR NUMSER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


7+ 
; Write and verify 16 data patterns in all used bits of all lower bytes of all 
; registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 

3 Tie each pattern, set all the used bits of all active registers. 


; REGTST routine reports errors with numbers »>>>>> ERROR 1909 - 1911 <<<cc, 
Tod 
MOV #1909. ,ERRNBR sSET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
NEG R4 sINDICATE R/M/W ACCESS, SET FIRST. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 


3¢ 

; Write and verify 16 data patterns in all used bits of all high bytes of all 

3 registers on all active lines. Use READ/MODIFY/WRITE accesses. Before 

; writing each pattern, set all the used bits of all active registers. 

; REGTST routine reports errors with numbers >>>>> ERROR 1912 - 1914 RKKeC, 


MOV #1912. ,ERRNBR sSET UP ERROR NUMBER FOR REGTST ROUTINE. 
NEG R3 sINDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 
JSR PC ,REGTST sWRITE AND VERIFY DATA PATTERNS. 

3* 

; Print error summary reports if necessary. 

; The following routine reports errors with number >>>>> ERROR @ 1915 <<<<< 
MOV #1915. ,ERRNBR ;SET UP ERROR NUMBER FOR NEXT RTN. 


JSR PC ,REPSMR sREPORT ERROR SUMMARY IF NECESSARY. 
60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
ENDTST 
L10047: 


TRAP CSETST 








a 
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SEQ 0164 
HARDWARE TEST - IDBIT - 
6336 -SBTTL HARDWARE TEST - IDBIT - 
6337 Ft SROREREESEEREEEESEEEEEEE DEEDES EOEO DEED ED OE DS OOOO EE EO OD OED OO OED DEER EEEEEEE 
6338 3% - Device Register ID Bit Test - 
6339 :* 
ty 3% This test verifies that the DUT STAT register ID bit reads as clear. 
3% 
6342  elalllacachcatecahteet eet LLL LLL LLL Ltt ttt ttt TTT TTT TT TTT TT TTT TTT TTT tt 
6343 
6344 032454 BGNTST 
032454 T19:: 
6345 000023 TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
6346 032454 012737 000023 002326 MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (20) 
6347 032462 012737 177777 002352 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
6348 032470 012737 000001 003766 MOV #1,ERRTYP sSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 
6349 032476 012737 003721 003770 MOV #2001. ,ERRNBR sSET UP ERROR NUMBER IN THE ERROR TABLE. 
Seee 032504 012737 012713 003772 MOV €M2001,ERRMSG ;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 
3¢ 
6352 ; Reset the DUT to a known state, do not remove the status codes from the fifo. 
6353 ; Clear TX and RX interrupt enable bits in the CSR. 
coo ; This subroutine reports errors >>>>> 2001 <<<<<, 
635 %- 
6356 032512 004737 021456 JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
otf 022516 103016 BCC 60$ sFATAL RESET ERROR? YES, EXIT THE TEST. 
3* 
rose ; Read the STAT register ID bit and verify that it is clear. 
6361 032520 017701 147526 MOV OSTATA,R1 sREAD THE STAT REGISTER CONTENTS. 
6362 032524 032701 0v0400 BIT oBIT8,R1i ;CHECK THE ID BIT. 
6363 032530 001411 BEQ 60$ sID BIT CLEAR? YES, EXIT THE TEST. 
6364 032532 012737 003722 003770 MOV #2002. ,ERRNBR 3NO, SET THE ERROR REPORT NUMBER TO 2002. 
6365 032540 012701 012755 MOV #EM2002,R1 sGET THE PROPER ERROR MESSAGE. 
6366 032544 012737 016470 003774 MOV #EROSO3,ERRBLK ;SELECT THE PROPER ERROR REPORT ROUTINE. 
6367 032552 ERROR sERROR NUMBER >>>>> 2002 <<««< 
032552 104460 TRAP CSERROR 
6368 032554 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE COMPLETED THE TEST. 
6369 032560 ENDTST 
032560 L10050: 


032560 104401 TRAP CsETST 
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SEQ 0165 


6371 -SBTTL HARDWARE TEST - NOTXDV - 
6372 BB Mlacachacatecaahaheeeeeeh tnd tibet LLL LL Litt t iti ttt TTT TTT TTT TT TTT TTT TT TTT tT 
6373 3% - No TX_DATA_VALID/No TX_ACTION Test - 
6374 3% This test verifies that if ea data word is written without the 
6375 3% TX_DATA_VALID bit set, no TX_ACTION will be generated. 
6376 3% To ensure data is not accidentally transmitted, the test is performed 
2 iad 3% in internal loopback, and on all active lines. 
3* 
6379 Rell cathtacadachdeceaheen hath L aL LILI t iti ttt TTT i tT TTT TTT TTT TTT TTT TTT TTT TTT Ts 
6380 032562 BGNTST 
032562 T20:: 
6381 000024 TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 
6382 032562 012737 000024 002326 MOV #TNUM, TSTNUM ;SET UP THE TEST NUMBER. (21) 
6383 032570 012737 177777 002352 MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
6384 032576 012737 000001 003766 MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
6385 032604 012737 004065 003770 MOV #2101. ,ERRNBR sSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
6386 032612 012737 013030 003772 MOV @EM2101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
odd 032620 012737 017422 003774 MOV ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
6 Hd 
6389 ; Reset the DUT to a known state, remove the status codes from the fifo. 
6390 ; Clear TX and RX interrupt enable bits in the CSR. 
tte ; This subroutine reports error >>>>> 2101 <<<<<, 
6392 s- 
6393 032626 004737 020156 JSR PC,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
6394 032632 103054 BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 
coon 032634 005237 003770 INC ERRNBR ;SET THE ERROR NUMBER TO 2102. 
3¢ 
6397 ; Set internal loopback on all active lines. 
6398 ; Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 
6399 ; 2 stop bits. 
Seaa ; Disable transmitters on all active lines. 
6401 3- 
6402 032640 013705 002236 MOV ACTLNS,RS sPASS THE ACTIVE LINE BIT MAP. 
6403 032644 012700 000200 MOV #200 ,RO s;PASS THE LNCTRL CONTENTS. 
6404 032650 004737 023516 JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
6405 032654 012700 177670 MOV #177670,R0 sPASS THE LPR CONTENTS. 
6406 032660 004737 023572 JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
6407 032664 012704 000012 MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI SECS. 
6408 032670 004737 020300 JSR PC ,DELAY sWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 
6409 032674 004737 022570 JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL ACTIVE LINES. 
6410 3¢ 
6411 ; Test all active lines individually. 
6412 ; Write a date word to the TXCHAR register with TX_DATA_VALID clear. 
6413 ; Verify no TX_ACTION is generated. 
6414 s- 
6415 032700 013705 002236 MOV ACTLNS,R5 sGET THE ACTIVE LINE BIT MAP. 
6416 032704 005004 CLR R4 ;CLEAR THE LINE NUMBER COUNTER. 


6417 032706 000241 2$: CLC sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
6418 032710 006005 ROR R5 sSHIFT THE BIT MAP INTO THE CARRY BIT. 
ss 032712 103020 . BCC as :D0 NOT TEST THE LINE IF IT IS INACTIVE. 
20 3+ 
6421 ; Select the line under test. 
6422 ; Write date word (ASCII <LF>) to TXCHR register with the most significant 
root ; bit CTX_DATA_VALID) clear. 
6424 i? 
6425 032714 010477 147324 MOV R4,8CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
6426 032720 012777 000012 147320 MOV #12,8TXCHA sWRITE THE DATA WORD TO THE DUT‘S TXCHAR REG. 


—- 
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ee 


032726 
032732 
032736 
032742 


032744 
032746 


032752 
032752 


032754 
032756 
032760 
032762 


032764 
032770 
032770 
032770 





012701 
013702 
004737 
103004 


010401 
012702 


104460 


005204 
005705 
001352 
000400 


005037 


10440: 





- NOTXDV - 
3¢ 
; Wait for a TX_ACTION to be returned, report error if TX_ACTION found 
; before time-out occurs. 
| ag 
170002 MOV #170002,R1 sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 
002244 MOV CSRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
023246 JSR PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
BCC 4$ sSKIP ERROR REPORT IF TX-ACTION NOT FOUND. 
MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
013073 MOV $EM2102,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
:"TX_ACT FOUND AFTER INVALID DATA WORD WRITTEN” 
ERROR ; >>>>> ERROR 04102 <<<<<, 
TRAP CSERROR 
3¢ 
; Verify all active lines have been tested. 
4$: INC R4 sINCREMENT THE LINE NUMBER COUNTER. 
TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
BNE 2$ sYES; BRANCH TO TEST THE NEXT LINE. 
BR 60$ 3NO; EXIT THIS TEST. 
002352 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 
ENDTST 
L10051: 


TRAP CsETST 








SEQ 0166 








i 





CVDHADO DHV11-M FUNC TST PART 1 MACRO Y0S.02 Wednesday 08-May-85 10:14 Page 122 
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032772 
032772 


032772 
033000 
033006 
033014 
033022 
033030 


033036 
033042 


033104 
033110 
033112 
033120 
033122 
033124 


000025 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103066 


- TXDVAL - 


017422 


020156 


002236 
004232 


002326 
002352 
003766 
003770 
003772 
003774 


003770 





-SBTTL HARUWARE TEST - TXDVAL - 

ie HEO6O6 066606 0606600006 060606 606060000 006000006 000000000000 0000000000000000008 
34 - TX_DATA_VALID/TX_ACTION Test - 

3% This test verifies thet if e date word is written to the TXCHAR register 
34 with the TX_DATA_VALID bit set, a corresponding TX_ACTION wil! be 

3% nerated. 

3% © ensure date is not accidentally transmitted, the test is performed 

;* in internal loopback, and on all active lines. 


i-- BOO6 6666 0800606600 0666 66060066 600000006 000006 66000006 000000000600000046 00008 


BGNTST oat 

TNUM == TNUM + 1 ;INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
MOV @TNUM,TSTNUM §;SET UP THE TEST NUMBER. (22) 

MOV = @-1, CTRLCF ;INDICATE THAT WE ARE IN A TEST. 

MOV #1, ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV @2201.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

MOV @EM2201,ERRMSG ;SET ERROR MESSAGE ADORESS IN ERRTBL. 

MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
3° 


; Reset the DUT to @ known state, remove the status codes from the Tite. . 
; Clear TX and RX interrupt enable bits in the CSR. 
; This subroutine reports error >>>>> 2201 <<«<«<<, 


§+ 
JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 

i¢ 


; Set internal loopback on all active lines. 

; Set LPR on ell lines to 38.4k beud, 8 bits per character, odd perity, 
; 2 stop bits. 

; Diseble transmitters on ell active lines. 

;7 


MOV ACTLNS .RS sPASS THE ACTIVE LINE BIT MAP. 

MOV #200 RO sPASS THE LNCTRL CONTENTS. 

JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 

MOV #177670,RO0 sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
MOV #10. ,R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 

JSR PC DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL ACTIVE LINES. 


3° 
; Test ell active lines individuelly. 

; Write @ date word to the TXCHAR register with TX_DATA_VALID set. 
; Verify that e corresponding TX_ACTION is genereted. 

a 


MOV ACTLNS ,RS sGET THE ACTIVE LINE BIT MAP. 
CLR R4 sCLEAR THE LINE NUMBER COUNTER. 
23: MOV 02202.,ERRNBR ;SET THE ERROR NUMBER TO 2202. 
cLc sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
BCC 8$ s00 NOT TEST THE LINE IF IT IS INACTIVE. 


3° 
; Select the line under test 


i; Write dete word (ASCII <LF>) to TXCHR register with the most significent 


3; bit (TX_DATA_VALID) set. 
ge 


























SEQ 0167 
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SEQ 0168 
















033126 010477 147112 MOV R4,@CSRA sSELECT THE LINE CURRENTLY UNDER TEST. 
oe 033132 012777 100012 147106 MOV #100012,GTXCHA ;WRITE THE DATA WORD TO THE DUT’S TXCHAR REG. 
3¢ 
6510 ; Weit for ea TX_ACTION to be returned, report error if no TX_ACTION 
6S11 3: found before time-out occurs. 





+ id 
012701 170002 MOV #170002,R1 sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 








6514 033144 013702 002244 MOV CSRA ,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
6515 033150 004737 023246 JSR PC ,WAIBIS sWAIT FOR TX_ACTION TO COME BACK. 
6516 033154 103403 Bcs 4$ sSKIP ERROR REPORT IF TX-ACTION FOUND. 
















6517 033156 012702 013224 MOV @EM2202,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
6518 "NO TX_ACT FOUND AFTER VALID DATA WORD TX'D*. 
road 033162 000411 BR 63 3GO REPORT THE ERROR. 
3¢ 
o44 ; Verify TX_ACTION returned from correct line. 
6523 033164 005237 003770 4$: INC ERRNBR sINCREMENT ERROR NUMBER TO 2103. 
6524 033170 000302 SWAB R2 sGET THE LINE NUMBER IN THE LOW BYTE. 
6525 033172 042702 177760 BIC #177760,R2 ;CLEAR THE UNWANTED BITS. 
6526 033176 020204 CMP R2,R4 3IS IT THE CORRECT LINE NUMBER?. 











6527 033200 001404 BEQ 83 sYES; SKIP THE ERROR REPORT. 
6528 033202 012702 013316 MOV @€M2203,R2 sPASS THE ERROR MESSAGE TO BE REPORTED. 
6529 s “INCORRECT LINE @ RETURNED WITH TX_ACT” 
6530 033206 010401 63: MOV R4,R1 sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
6531 033210 ERROR ; >>>>> ERROR <<ccc, 
033210 104460 TRAP CSERROR 

6532 
6533 3¢ 
+24 ; Verify ell ective lines heave been tested. 

ge 
6536 033212 005204 83: INC R4 sINCREMENT THE LINE NUMBER COUNTER. 
6537 033214 005705 TST RS sARE THERE ANY MORE ACTIVE LINES TO TEST?. 
rae 033216 001335 BNE 2s sYES; BRANCH TO TEST THE NEXT LINE. 
6540 033220 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 







033224 L100S2: 
033224 104401 TRAP CSETST 














HARDWARE TEST 























000026 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103110 


013705 
012700 
004737 
012700 
004737 
012704 
004737 
012705 
004737 


012703 
005004 


013423 
017422 


020156 


022575 
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- TXENBI- 


003772 
003774 


003770 


-SBTTL HARDWARE TEST - TXENBI- 


3% £26626066 660666060060 06 6666660606068 066660606 040006 6000000006 060000000000060008 


34 - TX_ENABLE (Inective) Test - 

3% This test verifies that when the line under test's TX_ENABLE bit is 
3% cleer, trensai ssion will not teke plece on thet line 

3% This test is performed in internel loopbeck, and on n ell ective lines. 


T22:: 
sINCREMENT THE ASSEMBLY TIME cer” meee 


MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. 
MOV €-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1,ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #2301.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV #EM2301,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
MOV #€R9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 
"Reset the DUT to e known state, remove the stetus codes from the fifo. 
; Clear TX end RX interrupt eneble bits in the CSR. 
3; This subroutine reports error >>>>> 2301 <<<<<, 
+ Yd 
JSR PC ,.CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
Bcc 60% sRESET FAILURE?, ABORT THIS TEST. 
3¢ 
: Set internel loopbeck on ell active lines. 
s Set LPR on all lines to 38.4k baud, 8 bits per character, odd perity, 
s 2 stop bite. 
Enable trenemitters on ell lines. 
g= 
MOV ACTLNS RS sPASS THE ACTIVE LINE BIT MAP. 
MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 
JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 
#177670,R0 sPASS THE LPR CONTENTS. 
JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
#10. .R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 
JSR PC DELAY sWAIT FOR UNCTR AND LPR REGS TO BE UPDATED. 
@MAPLNS RS sPASS THE BIT MAP CORRESPONDING TO ALL LINES. 
JSR PC, TXENBL sENABLE TRANSMITTERS ON ALL LINES. 
se 
s Test ell ective lines individvelly. 
1 Diseble treneamission on each ective line. 
A 
MOV #1,R3 sSET UP THE LINE BIT MAP FOR CHANNEL 0. 
CLR RS ICLEAR THE LINE NUMBER COUNTER. 
2s: MOV 2302. .ERRNBR ;SET THE ERROR NUMBER TO 2302. 


eIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
BEQ 6s sSKIP TESTING THIS LINE IF IT IS INACTIVE. 
3° 


1 Cleer the TX_ENMABLE bit in TBUFFAD2 register. 
: Select the line under test. 
s Verify it ie cleer, report errer if set. 


t- 
mov RS RS sPASS THE BIT MAP OF THE LIME WODER TEST. 








led 


CVDHADO DHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Pege 123-1 


HAROWARE TEST 


6599 033400 
600 033404 


6634 033512 
6635 033516 


6637 033520 
6638 033524 
033524 
033524 





005777 
100433 


012737 
012777 
012701 
013702 
004737 
103016 


005237 
012701 
013702 
004737 
103405 
005237 
017702 
100004 


010401 
012702 


104460 


000241 
006103 
005204 
020427 
002715 


005037 


104401 





- TXENBI - 
146654 


004377 003770 
100012 146624 
170002 
002244 
023246 


003770 
070012 
002244 
023246 


003770 
146554 


013461 


000010 


002352 


TST 
BMI 
t¢ 


@TXAD2A 
4s 





sVERIFY THE TX_ENABLE BIT IS SET. 
sGO REPORT ERROR IF TX_ENABLE BIT SET. 


+ Write data word (ASCII <LF>) to TXCHR register. 
; Wait for a TX_ACTION to be returned, report error if e TX_ACTION 
: is found before time-out occurs. 


sSET ERROR NUMBER TO 2303. 

sWRITE THE DATA WORD TO THE DUT’S TXCHAR REG. 
sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 

sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR TX_ACTION TO COME BACK. 

sGO REPORT ERROR IF NO TX-ACTION FOUND. 


3° 
; Weit for the data to appeer in the fifo, report error if data found. 


MOV #2303. ,ERRNBR 
MOV #100012, @TXCHA 
MOV #170002,R1 
MOV CSRA ,R2 
JSR PC ,WAIBIS 
BCC 4$ 
g- 
INC ERRNBR 
MOV #70012 ,R1 
MOV CSRA,R2 
JSR PC ,WAIBIS 
BCS 43 
INC ERRNBR 
MOV ORBUFA ,R2 
BPL 6$ 
43: MOV R4,R1 
MOV @€M2302,R2 
ERROR 


sSET ERROR NUMBER TO 2304. 

sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 
sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR RX_DATA_AVAILABLE TO SET. 

sREPORT ERROR IF DATA RECEIVED IN THE FIFO. 
sSET ERROR NUMBER TO 2305. 

sREAD THE DATA FROM THE FIFO. 

sSKIP ERROR REPORT IF DATA IS THERE. 


sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
sPASS THE MESSAGE TO BE REPORTED. 
;"TX_ENABLE BIT BAD ON LINE: nn”. 
3 >>>>> ERROR <<<<<, 


TRAP CSERROR 


3° 
; Verify all active lines have been tested. 


ge 
6$: cLC 


60$: CLR 
ENDTST 


CTRLCF 


sCLEAR THE CARRY BIT PRIOR TO ROTATION. 
sSHIFT THE BIT MAP FOR THE NEXT LINE. 
sINCREMENT THE LINE NUMBER COUNTER. 
sHAVE ALL THE LINES BEEN TESTED?. 

sNO; BRANCH TO TEST THE NEXT LINE. 


sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10053: 
TRAP 


CSETST 











CVDHADO DHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 124 
HARDWARE TEST 


— 


033526 
033526 


033526 
933534 
033542 
033550 
033556 
033564 


033572 
033576 


033600 
033604 
033610 
033614 
033620 
033624 
033630 
033634 
033640 


033644 
033650 
033652 
033660 
033664 


033666 
033670 
033674 


000027 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103127 


013705 
012700 
004737 
012700 
004737 
012704 
004737 
012705 
004737 


012703 


010305 
004737 
012705 


- TXENBA- 


000027 
177777 
000001 
004541 
013517 
017422 


020156 


002236 
000200 
023516 
177670 
023572 
000012 
020300 
000377 
022570 


000001 


004542 
002236 


022664 
000012 





002326 
002352 
003766 
003770 
003772 
093774 


003770 


SEQ 0171 

-SBTTL HARDWARE TEST - TXENBA- 
3O¢ 06666664666 6660 6660664066 64604666 64666 066604666066 6606066 666464666 660464666666666664646 
34 - TX_ENABLE (Active) Test - 
34 This test verifies that when the TX -ENABLE bit is set in the approriate 
34 line register, transmission will teke place on that line. 
34 This test is performed in internel loopback, and on all active lines. 
s 
oe. SASS SEKEEKEL 6604646060466 66 66 0666064664666646 6666466046 060606646 466466466646 4464464444664% 

BGNTST —_ 

TNUM == TNUM ¢« 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (24) 

MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #2401.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM2401,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3° 

; Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports error >>>>> 2401 <<<<<, 


‘= 
JSR PC ,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
Bcc 60$ sRESET FAILURE?, ABORT THIS TEST. 

3¢ 

; Set internal loopback on all active lines. 

; Set LPR on all lines to 38.4k baud, 8 bits per character, odd parity, 

; 2 stop bits. 

; Disable transmitters on all lines. 

3= 


MOV ACTLNS ,R5 sPASS THE ACTIVE LINE BIT MAP. 

MOV #200 ,RO sPASS THE LNCTRL CONTENTS. 

JSR PC ,WTWLNC sINITIALISE THE LNCTRL REGISTERS. 

MOV #177670,R0 sPASS THE LPR CONTENTS. 

JSR PC ,WTWLPR sINITIALSE THE LPR REGISTERS ON ALL LINES. 
MOV #10. .R4 sPASS DELAY TIME OF 10 MILLI-SECONDS. 

JSR PC ,DELAY sWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
MOV @MAPLNS,RS sPASS THE BIT MAP CORRESPONDING TO ALL LINES. 
JSR PC, TXDSBL sDISABLE TRANSMITTERS ON ALL LINES. 


3¢ 

; Test all active lines individually. 

; Enable transmission on each active line. 
;- 


MOV #1,R3 ;SET UP THE LINE BIT MAP FOR CHANNEL O. 
CLR. R4 s;CLEAR THE LINE NUMBER COUNTER. 
2s: MOV $2402.,ERRNBR ;SET THE ERROR NUMBER TO 2402. 
BIT R3,ACTLNS sCHECK IF THE LINE IS ACTIVE. 
BEQ 8$ sSKIP TESTING THIS LINE IF IT IS INACTIVE. 


' "select the line under t 

; Set the TX_ENABLE bit fn * FBUFFADE register. 
; Verify it is set, report error if clear. 
:- 


MOV R3,R5 sPASS THE BIT MAP OF THE LINE UNDER TEST. 
JSR PC, TXENBL sENABLE TRANSMISSION ON THE LINE UNDER TEST. 
MOV #10. ,R5 sSET TXCHAR/LOOP COUNT TO 10. 
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HARDWARE TEST 


6696 033700 
6697 033704 
6698 033710 
6699 


6704 033712 
6705 033720 
6706 033726 
6707 033732 
6708 033736 
6709 033742 


6713 033744 
6714 033750 
6715 033754 
6716 033760 
6717 033764 
6718 023766 
6719 033772 
6720 033776 
6721 034000 
6722 034004 
6723 034006 
6724 034012 
6725 034014 
6726 034016 
6727 034020 
6728 034022 


6730 034024 
6731 034026 


6733 034032 
034032 


6737 034034 
6738 034036 
6739 034042 
6740 034044 
6741 034046 
6742 034050 
6743 034054 


6745S 034056 
6746 034062 
034062 
034062 


—— 





010477 
005777 
100045 


012737 
012777 


010305 
004737 
000241 
006103 
005204 
020427 
002676 


005037 


104401 


- TXENBA- 


146340 
146350 


004543 
100012 
170002 
002244 
023246 


003770 
070012 
002244 
023246 


003770 
146250 


003770 
177760 


013461 


022570 


000010 


002352 





003770 4%: 
146320 


6$: 
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MOV 
TST 
BPL 
3¢ 


R4,@CSRA 
8TXAD2A 
6$ 


sSELECT THE LINE CURRENTLY UNDER TEST. 
sVERIFY THE TX_ENABLE BIT IS SET. 
sGO REPORT ERROR IF TX_ENABLE BIT CLEAR. 


s Write data word (ASCII <LF>) to TXCHR register. 
; Wait for a TX_ACTION to be returned, report error if no TX_ACTION 
: found before time-out occurs. 


#2403. ,ERRNBR 
#100012, 8TXCHA 


#170002,R1 
CSRA,R2 

PC ,WAIBIS 
63 


PC ,WAIBIS 
6$ 


ERRNBR 

ORBUFA ,R2 

6$ 

ERRNBR 

R2 

#177760,R2 
R4 


R4,R1 
%€M2302,R2 


sSET ERROR NUMBER TO 2403. 

sWRITE THE DATA WORD TO THE DUT’S TXCHAR REG. 
sTEST BIT 15, TIMEOUT OF 2 MILLI SECS. 

sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR TX_ACTION TO COME BACK. 

sGO REPORT ERROR IF NO TX-ACTION FOUND. 


3¢ 
; Wait for the data to appear in the fifo, report error if time-out. 


sSET ERROR NUMBER TO 2404. 

sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 

sPASS THE ADDRESS OF THE REGISTER TO TEST. 
sWAIT FOR RX_DATA_AVAILABLE TO SET. 

sREPORT ERROR IF NO DATA RECEIVED IN THE FIFO. 
sSET ERROR NUMBER TO 2405. 

sREAD THE DATA FROM THE FIFO. 

:GO REPORT ERROR IF THER IS‘NT ANY DATA THERE. 
sSET ERROR NUMBER TO 2406. 

sPUT THE LINE NUMBER IN THE LOW BYTE. 

sCLEAR THE UNWANTED BITS. 

sDID THE DATA COME FROM THE CORRECT LINE?. 
3NO; GO REPORT THE ERROR. 

sDECREMENT THE TXCHAR/LOOP COUNTER. 

sLOOP TO TX THE NEXT CHAR. 

3GO TEST THE NEXT LINE. 


sPASS THE NUMBER OF CURRENT LINE UNDER TEST. 
sPASS THE MESSAGE TO BE REPORTED. 
;“TX_ENABLE BIT BAD ON LINE: nn”. 
; >>>>> ERROR <<<<c<, 


TRAP CSERROR 


3¢ 
; Verify all active lines have been tested. 


60$: 


CLR 


ENDTST 


R3,R5S 
PC, TXDSBL 


CTRLCF 


sPASS THE BIT MAP OF THE LINE UNDER TEST. 
sCLEAR THE TX_ENABLE BIT ON THIS LINE. 
sCLEAR THE CARRY BIT PRIOR TO ROTATION. 
sSHIFT THE BIT MAP FOR THE NEXT LINE. 
sINCREMENT THE LINE NUMBER COUNTER. 

sHAVE ALL THE LINES BEEN TESTED?. 

3NO; BRANCH TO TEST THE NEXT LINE. 


sINDICATE THAT WE ARE NOT WITHIN A TEST. 
L10054: 


TRAP 


CSETST 








SEQ 0172 
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HARDWARE TEST 


— 


6793 


034064 
034064 


034064 
034072 
034100 
034106 
034114 


034122 
034126 
034130 
034134 


034142 
034146 


034152 
034156 
034162 
034166 
034174 
034200 
034200 
034204 
034210 
034214 
034220 
034222 
034226 
034226 
034232 
034236 
034242 





000030 
012737 
012737 
012737 
012737 
012737 


004737 
103402 
000137 
012737 


012705 
004737 


005937 
005037 
005037 
012737 
106427 


012746 
012746 
013746 
012746 
104437 
062706 


012746 
012746 
013746 
012746 


- INTA - 


003101 
013553 


021456 


(35070 
005053 


000377 
022664 


002334 
002336 
002340 
002726 
000240 


000240 
024036 
002232 
000003 


000010 


000240 
023650 
002234 
000003 


002326 
002352 
003766 
003770 
003772 


003770 


002324 





.SBTTL HARDWARE TEST - INTA - 
BE eae heheh hte tet TTT Li titi titi titi TT TT TTT TTT TTT TTT Tee Te Te ees 
34 - Interrupt Test - 
34 This test verifies that the Device Under Test (DUT) will generate 
34 reception and transmission interrupts correctly. This test does 
3% not depend on the use of the serial line transmission or reception 
3% capabilities of the DUT. The lines are put in internal loopback 
34 to minimize any external effects that could be caused on devices 
3% attached to the serial lines. 
3* 
i-- PRERGRESEEEEEEEEEDEEEEEE ODODE ODES EEEDODEEEE ES OKES EOD ODED EEEEEEEDEEEEEEDES 

BGNTST 

T24:: 

TNUM == TNUM + 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (26) 

MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1,ERRTYP sSET ERROR FATAL ERROR TYPE IN ERROR TABLE. 


MOV #1601.,ERRNBR  ;SET FIRST ERROR REPORT NUMBER IN ERROR TABLE. 
MOV EM2601.,ERRMSG ;SET TEST ERROR MESSAGE IN ERROR TABLE. 


3¢ 
; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 

; This subroutine reports errors from >>>>> 2601 thru 2602 <<<<<. 

as 


JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS 2s sSKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
JMP 60$ sABORT TEST IF FATAL ERROR FOUND DURING RESET. 
2s: MOV #2603. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 2603. 
3¢ 
; Enable transmitters on all lines. 
A$: MOV @MAPLNS,.RS sPASS ACTIVE LINE BIT MAP. 
JSR PC, TXENBL s;ENABLE TRANSMISSION ON ALL LINES. 


3? 

; Test reception interrupts. 

3 Set up for RX and TX interrupts: 

; RX interrupt service routine inputs a char and counts the interrupt. 
; TX interrupt service routine counts TX interrupts. 


CLR RXINTC sCLEAR THE RX INTERRUPT COUNTER. 

CLR RXINTF ;CLEAR THE RX INTERRUPT FLAGS. 

CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 

MOV @BUFBAS,BUFPTR ;LOAD THE BUFFER PTR WITH THE BUFFER BASE ADR. 
MTPS @PRIOS sDISABLE DEVICE INTERRUPTS. 

SETVEC RXVECA,@RXINPT,@PRIOS ;SET UP INTERRUPT VECTOR _ RX INT. 





SEQ 0173 


@PRIOS, -(SP) 


MOV ORXINPT, - 


(SP) 


MOV RXVECA, -(SP) 


MOV @3,-(SP) 

TRAP C$SVEC 

ADD #10, SP 
SETVEC TXVECA,@CACHTX,@PRIOS ;SET UP INTERRUPT VECTOR ee TX INT. 


@PRIOS, - (SP) 
MOV @CACHTX, -C SP) 
MOV TXVECA, -(SP) 


#3,-(SP) 
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HARDWARE TEST 


— 


034246 
034250 
034254 


034260 
034264 
034270 
034274 


034300 
034304 


034306 
034312 
034320 
034322 
034326 
034334 
034336 
034342 


034344 
034350 
034352 


034356 
034356 
034360 
034362 
034364 


034366 
034372 


034374 
034400 
034400 
034402 
034404 
034406 





104437 
062706 
106427 


004737 
012704 
004737 
004737 


005737 
001017 


012701 
032777 
001416 
012701 
032777 
001410 
012701 
000405 


005737 
100006 
012701 


104455 
005053 
013553 
016470 


013702 
001406 


012701 


013553 
016514 


- INTA - 


000010 
000000 


022236 
000004 
020300 
022204 


002334 


013762 
000200 


013674 
100000 


013603 


002336 
014056 


002340 


010003 


145724 


145712 





TRAP C$SVEC 
ADD #10, SP 
MTPS @PRIOO sALLOW INTERRUPTS. 
3¢ 
sEnable reception interrupts. 
sDelay 4 ms to allow time for the interrupts to take place. 
sDisable reception interrupts. 


= 
JSR PC ,RXIEL sENABLE THE RECEPTION INTERRUPTS. 
MOV 04,R4 sPASS 4 MS COUNT TO THE DELAY ROUTINE. 
JSR PC ,DELAY sDELAY 4 MILLI-SECONDS. 
JSR PC .RXIEO sDISABLE RECEPTION INTERRUPTS. 
3¢ 
; Verify that the correct interrupts took place. 
; Test the int counter to verify that interrupts took place. 


: TST RXINTC sCHECK THE RX INTERRUPT COUNT. 
BNE 6$ sSKIP THE FOLLOWING ERRORS IF COUNT <> 0. 
* 
; Determine reason for no RX interrupts and print proper error message. 


Tad 
MOV €M2604 ,R1 sSET UP MSG IN CASE “RX.DATA.AVAIL IS CLR”. 

BIT @BIT7,@CSRA sTEST THE RX.DATA.AVAIL BIT OF THE CSR. 

8$ sGO REPORT ERROR IF RX.DATA.AVAIL IS CLR. 
MOV #€M2603,R1 sSET UP MSG IN CASE “DATA.VALID IS CLEAR”. 
BIT #BIT1S,QRBUFA ;TEST THE DATA.VALID BIT OF THE FIFO. 

8$ sGO REPORT ERROR IF DATA.VALID IS CLEAR. 
MOV #€M2602,R1 sSET UP MSG, "DATA.VALID IS SET”. 

8$ GO REPORT THE ERROR. 


3¢ 
; If RX ints occurred with RX.DATA.AVAIL clear, report the error. 
a= 


6$: TST RXINTF sCHECK THE RX INTERRUPT FLAGS. 
BPL 10$ sSKIP THE ERROR IF FLAG IS CLEAR. 
MOV #€M2605,R1 sSET UP THE PROPER MESSAGE. 


3¢ 
; Report the error which has been found. 


8$: ERRDF 2603,EM2601,ER0503; >>>>> ERROR #2603 <<<<<, 
TRAP CSERDF 
-WORD 2603 
-WORD EM2601 
-WORD ERO503 

3¢ 

; Verify that no TX interrupts have been generated so far in this test. 

10$: MOV TXINTC ,R2 sLOAD # OF TX INTERRUPTS FOR EROSO4 RTN. 

BEQ 2$ s;SKIP ERROR IF NO TX INTERRUPTS. 


1 

sREPORT “TX INTERRUPTS(S) RECEIVED WITH TX INTERRUPTS DISABLED.” 

MOV #EM0526,R1 ;SET UP MESSAGE ADR FOR INDIRECT PRINT. 

ERRDF  2604,EM2601,ER0504; >>>>> ERROR #2604 <<<<<, 

TRAP CSERDF 

«WORD 2604 
-WORD EM2601 
-WORD EROSO4 





z+ 
; Clean out the interrupt vectors used in this test. 





SEQ 0174 
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SEQ 0175 


HARDWARE TEST - INTA - 

6841 he 

6842 034410 106427 000240 12$: MTPS #PRIOS sDISABLE DEVICE INTERRUPTS. 

6843 034414 CLRVEC RXVECA sRETURN RX INT VECTOR TO UNUSED POOL. 

034414 013700 002232 MOV RXVECA,RO 
034420 104436 TRAP CsCveEc 

6844 034422 CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 

034422 013700 002234 MOV TXVECA,RO 
034426 104436 TRAP CsCVEC 

6845 3+ 

6846 ; Test transmission interrupts. 

6847 ; Set up for RX and TX interrupts: 

6848 ; RX interrupt service ruutine counts RX interrupts. 

coer ; TX interrupt service routine counts the interrupt and sets flags. 

faa 

6851 034430 005037 002334 CLR RXINTC sCLEAR THE RX INTERRUPT COUNTER. 

6852 034434 005037 002340 CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 

6853 034440 005037 002342 CLR TXINTF sCLEAR THE RX INTERRUPT FLAGS. 

6854 034444 SETVEC RXVECA,@CACHRX,@PRIOS ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
034444 012746 000240 MOV #PRIOS, -(SP) 
034450 012746 023622 MOV @CACHRX, -C SP) 
034454 013746 002232 MOV RXVECA,-CSP) 
034460 012746 000003 MOV @3,-(SP) 
024464 104437 TRAP C$SVEC 
034466 062706 000010 ADD #10, SP 

6855 034472 SETVEC TXVECA,@TXINTR,@PRIOS ;SET UP INT VECTOR TO TX INT ROUTINE. 

034472 012746 000240 MOV @PRIOS, -(SP) 
034476 012746 024144 MOV @TXINTR, -( SP) 
034502 013746 002234 MOV TXVECA, -(SP) 
034506 012746 000003 MOV @3,-(SP) 
034512 104437 TRAP C$SVEC 

034514 062706 000010 é ADD #10, SP 

aos 034520 106427 000000 MTPS #PRIOO sALLOW INTERRUPTS. 

68 3+ 

aoae ; Verify that the TX_ACTION bit is clear. 

68 3° 

6860 034524 012705 000022 MOV #18. ,R5 sINITIALIZE THE LOOP COUNTER. 

6861 034530 012701 000144 MOV #100.,R1 sSET 100 MS TIME-OUT. 

6862 034534 012702 100000 MOV #BIT15,R2 sSELECT TX_ACTION BIT TO TEST. 

6863 034540 013704 002244 MOV CSRA,R4 sPASS DUT CSR AS THE WORD TO TEST. 

6864 034544 012703 100000 14$; MOV #B81T15,R3 sWAIT FOR TX_ACTION TO BE SET. 

6865 034550 004737 020454 JSR PC ,MSLOOP sWAIT UP TO 100 MS FOR TX_ACTION SET. 

6866 934554 103020 BCC 20$ sIF TIME-OUT, CONSIDER TX_ACTION CLEAR. 

6867 034556 005003 CLR R3 sNOW, WAIT FOR TX_ACTION CLEAR. 

6868 034560 004737 020454 JSR PC ,MSLOOP sWAIT UP TO 100 MS FOR TX_ACTION CLEAR. 

6869 034564 103005 BCC 16$ sIF TIME-OUT, REPORT TX_ACTION WON'T CLEAR. 

6870 034566 005305 DEC RS sDECREMENT THE TX_ACTION SET COUNTER. 

6871 034570 001365 BNE 14$ sLOOP IF NOT TOO MANY TX_ACTIONS FOUND. 

6872 sREPORT “TX_ACTION SET REPEATEDLY AFTER RESET, NO DATA SENT.” 

6873 034572 012701 014200 MOV 9EM2607,R1 s;SELECT ERROR MESSAGE. 

6874 034576 000402 BR 18% 3GO TO REPORT THE ERROR. 

6875 034600 012701 014274 16$: MOV #E€M2608,R1 sSELECT TX_ACTION STUCK SET MSG. 

6876 034604 18$: ERRDF 2605,EM2606,ERO0503; >>>>> ERROR #2605 <<<<<, 

034604 104455 TRAP CSEROF 
034606 005055 -WORD 2605 
034610 014141 -WORD EM2606 
034612 016470 -WORD EROSO3 

6877 034614 000424 BR 24% 3GO TO TEST WITH TX_ACTION SET. 


— 











CVDHADO OHV11-M FUNC TST PART 1 MACRO YOS.02 Wednesday 08-May-85 10:14 Page 125-3 


SEQ 0176 
HARDWARE TEST - INTA - 

6878 3+ 

coon ; Verify that no interrupts occur with TX_ACTION clear. 

6880 8° 

6881 034616 004737 023012 20$: JSR PC, TXIEL sENABLE TX_INTERRUPTS. 

6882 034622 012704 000062 MOV #50. ,R4 sPASS 50 MS TIME TO THE DELAY ROUTINE. 

6883 034626 004737 020300 JSR PC ,DELAY sDELAY 50 MILLI-SECONDS TO ALLOW INTS TO OCCUR. 

6884 034632 005737 002340 TST TXINTC sTEST THE TX INTERRUPT COUNT. 

6885 034636 001413 BEQ 243 sSKIP THE ERROR IF NO TX INTERRUPTS. 

6886 034640 012701 014200 MOV #E€M2607,R1 sSELECT MESSAGE IN CASE TX INT FLAG CLEAR. 

6887 034644 005737 002342 TST TXINTF ;TEST THE TX INTERRUPT FLAGS. 

6888 034650 100002 BPL 22$ 3GO REPORT ERROR IF TX FLAG IS CLEAR. 

6889 034652 012701 014345 MOV $EM2609,R1 3TX FLAG IS = SELECT PROPER ERROR MESSAGE. 

6890 sREPORT “TRANSMIT INTERRUPT TEST ERROR:. 

6891 034656 22$: ERRDF 2606,EM2606,ERO0503; >>>>> ERROR #2606 <<<<<, 
034656 104455 TRAP CSERDF 
034660 005056 -WORD 2606 
034662 014141 -WORD EM2606 
034664 016470 -WORD EROSO3 

6892 3¢ 

6893 ; Prepare TX interrupt counter and flags. 

6894 3° 

6895 034666 005037 002340 243: CLR TXINTC ;CLEAR THE TX INTERRUPT COUNT. 

oo 034672 005037 002342 CLR TXINTF ;CLEAR THE TX INTERRUPT FLAGS. 

68 3+ 

res ; Set up line parameters for transmission. 

3 — 

6900 034676 012705 C00377 MOV @MAPLNS,RS sPASS ACTIVE LINES BIT MAP. 

6901 034702 012700 000200 MOV #200 ,RO sPASS INERT STATE, INTERNAL LOOPBACK. 

6902 034706 004737 023516 JSR PC ,WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 

6903 034712 012700 156430 MOV #156430,RO sSPECIFY 9600BPS,1STOP,NO PARITY,8BITS/CHAR. 

ooee 034716 004737 023572 JSR PC ,WTWLPR sWRITE TO ALL LPR REGISTERS. 

690 3¢ 

te ; Send a null char to each line. 

690 $- 

6908 034722 013701 002246 MOV TXCHA,R1 sSET UP TXCHAR REGISTER ADDRESS. 

6909 034726 012702 100000 MOV #100000, R2 ;SET CHARACTER TO BE TRANSMITTED = NULL. 

one 034732 004737 023546 JSR PC ,WTWLNS ;SEND NULL CHAR TO EACH LINE. 

691 3+ 

He ; Delay 250 milli-seconds to allow interrupts to occur. 

691 3° 

6914 034736 012704 000372 MOV #250. ,R4 ;SET UP FOR 250 MS DELAY. 

6915 034742 004737 020300 JSR PC ,DELAY ;WAIT 250 MS. 

6916 3+ 

6917 ; Verify that TX interrupts occurred. 

6918 s- 

6919 034746 005737 002340 TST TXINTC ;CHECK THE TX INTERRUPT COUNTER. 

6920 034752 001007 BNE 26% ;SKIP THE FOLLOWING ERROR IF WE GOT TX INTS. 

6921 i¢ 

ha ; Determine the reason that we received no interrupts. 

69 ge 

6924 034754 012701 014424 MOV #EM2610,R1 ;SET UP MSG IN CASE "TX_ACTION IS SET”. 

6925 034760 005777 145260 TST @CSRA ;CHECK THE DUT CSR. 

6926 034764 100407 BMI 28% ;GO TO REPORT ERROR IF TX_ACTION IS SET. 

3 034766 012701 014516 MOV #€M2611,R1 ;SET UP “TX_ACTION NOT SET” MESSAGE. 

3* 
oe ; Check to verify that TX_ACTION was set for each interrupt. 
6930 a° 





— 
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SEQ 0177 
HARDWARE TEST - INTA - 

6931 034772 005737 002342 26%: TST TXINTF sCHECK THE TX INTERRUPT FLAGS. 

6932 034776 100006 BPL 30$ sSKIP ERROR IF TX_ACTION CLR FLAG IS CLEAR. 

6933 035000 012701 014345 MOV 9EM2609,R1 ;SET UP TX INT WITH “TX_ACTION CLR” MSG. 

6934 

cena : "Report “TRANSMIT INTERRUPT TEST ERROR:.... 54 

6936 i 

6937 035004 283: ERRDF 2607,EM2606,ER0503; >>>>> ERROR #2607 <<<<<, 
035004 104455 TRAP CSEROF 
035006 005057 «WORD 2607 
035010 014141 «WORD EM2606 
035012 016470 «WORD EROSO3 

6938 3+ 

ee ; Verify that no TX interrupts have been generated so far in this test. 

0 3° 

6941 035014 013702 002334 30$: MOV RXINTC ,R2 ;LOAD @ OF RX INTERRUPTS FOR EROSO4 RTN. 

6942 035020 001406 BEQ 32$ ;SKIP ERROR IF NO RX INTERRUPTS. 

6943 035022 012701 007713 MOV #EM0525,R1 ;SET UP MESSAGE ADR FOR INDIRECT PRINT. 

6944 sREPORT “RX INTERRUPTS(S) RECEIVED WITH RX INTERRUPTS DISABLED.” 

6945 035026 ERRDF 2608,EM2606,ER0504; >»>>> ERROR #2608 <<<<<, 
035026 104455 TRAP CSERDF 
035030 005060 -WORD 2608 
035032 014141 «WORD EM2606 
025034 016514 -WORD ERO504 

6946 3+ 

oo. :; Disable interrupts and clean out the interrupt vectors used in this test. 

6948 ie 

6949 035036 005001 32$: CLR R1 ;CLEAR BOTH TRANSMITTER 

6950 035040 004737 022760 JSR PC, TXIEO ; INTERRUPT ENABLE AND RECEIVER 

6951 075044 004737 022204 JSR PC ,RXIEO ; INTERRUPT ENABLE BITS IN THE DUT CSR. 

6952 035050 106427 000240 MTPS @PRIOS ;DISABLE DEVICE INTERRUPTS. 

6953 035054 CLRVEC RXVECA ;RETURN RX INT VECTOR TO UNUSED POOL. 

035054 013700 002232 MOV RXVECA,RO 
035060 104436 TRAP CsCVEC 

6954 035062 CLRVEC TXVECA sRETURN TX INT VECTOR TO UNUSED POOL. 

035062 013700 002234 MOV TXVECA,RO 

—_ 035066 104436 TRAP CsCVEC 

6956 035070 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

6957 

6958 035074 ENDTST 
035074 L10055: 

035074 104401 TRAP CSETST 

6959 





a 





6973 035076 
035076 


6975 035076 
6976 035104 
6977 035112 
6978 035120 
6979 035126 
6980 035134 


6986 035140 
6987 035144 
6988 035146 
6989 035152 


6993 035160 
6994 035164 


6999 035170 
7000 035174 
035174 
035200 
035204 
035210 
035214 
035216 


7006 035222 
7007 035226 
7008 035232 
7009 035236 
7010 035242 





000031 
012737 
012737 
012737 
012737 
012737 
005037 


004737 
103402 
000137 
012737 


012705 
004737 


106427 


012746 
012746 
013746 
012746 
104437 
062706 


012705 
012700 
004737 
012700 
004737 
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- BRLEVA - 


000031 
177777 
000001 
005671 
014601 
002462 


021456 


035736 
005673 


000377 
022664 


000340 


000340 
024144 
002234 
000003 


000010 


000377 
000200 
023516 
156430 
023572 


002326 
002352 
003766 
003770 
003772 


003770 







SEQ 0178 












-SBTTL HARDWARE TEST - BRLEVA - 
$¢+ SREREREEEEEEEREE SEED DEES EEEEEEESEEEEED ES OD ODED ES OO ODODE OOOEEEOEEEEDEEDEOEE 









3% - BR Level Test 8 - 

3% This test verifies that the Device Under Test (DUT) will generate 

3% reception and transmission interrupts at the correct BR level. 

3% This test does not depend on the use of the serial line transmission 
3% or reception capabilities of the DUT. The lines are put in internal 
is loopback to minimize any external effects that could be caused on 

3% devices attached to the serial lines. 









F-- SHRREREE ERAS SEES EE EEEREDEREDEEED ODED EE ODEEOD EEO E OEE DEES OEESEEEDEEEDEEEDS 
BGNTST 
TNUM == TNUM + 1 








T25:: 
sINCREMENT THE ASSEMBLY TIME ~~ 














MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. 
MOV #-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 
MOV #1 ,ERRTYP ;SET ERROR TYPE AS FATAL IN ERROR TABLE. 
MOV #3001. ,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM3001,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
CLR ERSMRF sINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS. 
3¢ 
; Reset the DUT to a known state, do not remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CSR. 
; This subroutine reports errors from >>>>> 3001 thru 3002 <<<<<, 
JSR PC ,RESETT sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCS 2$ ;SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
JMP 60$ sABORT TEST IF FATAL ERROR FOUND DURING RESET. 
2$: MOV #3003. ,ERRNBR ;SET THE ERROR REPORT NUMBER TO 3003. 
3¢ 
; Enable transmitters on all lines. 
4$: MOV @MAPLNS,RS sPASS ACTIVE LINE BIT MAP. 





JSR PC, TXENBL sENABLE TRANSMISSION ON ALL LINES. 
3¢ 
; Generate a transmission interrupt request. 
; Processor priority should be at 7 disabling ints. 


MTPS @PRIO7 sDISABLE ALL INTERRUPTS. 

SETVEC TXVECA,@TXINTR,@PRIO7 ;SET UP INTERRUPT VECTOR TO CATCH TX INT. 
MOV @PRIO7,-CSP) 
MOV @TXINTR, -(SP) 
MOV TXVECA, -(SP) 
MOV @3,-(SP) 
TRAP C$SVEC 
ADD #10,SP 













3¢ 

; Set up DUT for transmission interrupts: 

; Set up internal loopback. 

; Set up line parameters for transmission. 


3° 
MOV @MAPLNS,RS sPASS ACTIVE LINES BIT MASK. 
MOV #200 ,RO sPASS INERT STATE, INTERNAL LOOPBACK. 
JSR PC ,WTWLNC sDISABLE RECPTION AND DMA, ETC. ON DUT. 
MOV #156430,RO0 sSPECIFY 9600BPS,1STOP,NO PARITY ,8BITS/CHAR. 
JSR PC ,WTWLPR sWRITE INTO ALL LPR REGISTERS. 
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ee 


7011 
7012 
7013 
7014 
7015 


035246 
035252 
035256 


035262 
035266 


035272 
035272 
035276 
035302 
035306 
035312 
035314 


035320 
035324 
035326 


035330 
035334 


035340 
035344 
035350 
035354 
035360 
035362 
035366 


035372 
035376 


035400 
035402 
035404 
035406 
035412 





013701 
012702 
004737 


012704 
004737 


012746 
012746 
013746 
012746 
104437 
062706 


012705 
005003 
005002 


004737 
004737 


005037 
005037 
005037 
005037 
106405 
012704 
004737 


005737 
001412 


005703 
001010 
010503 
052703 
013700 





SEQ 0179 
- BRLEVA - 
3° 
; Send a null cher to each line. 
= 
002246 MOV TXCHA,R1 sSET UP TXCHAR REGISTER ADDRESS. 
100000 MOV #100000, R2 sSET CHARACTER TO BE TRANSMITTED = NULL. 
023546 JSR PC ,WTWLNS ;SEND NULL CHAR TO EACH LINE. 
3¢ 
; Delay 50 ms to allow time for the interrupt to be generated. 
000062 ; MOV #50. .R4 sPASS SO MS TIME TO THE DELAY ROUTINE. 
020300 JSR PC ,DELAY sDELAY SO MILLI-SECONDS. 
3¢ 
; Generate a reception interrupt request. 
SETVEC RXVECA,@RXBRRT,@PRIO7 ;SET UP INTERRUPT VECTOR TO CATCH RX INT. 
000340 MOV @PRIO7,-(SP) 
023746 MOV ORXBRRT , -C SP) 
002232 MOV RXVECA, -(SP) 
000003 MOV 03 ,-(SP) 
TRAP C$SVEC 
000010 ADD #10, SP 
i¢ 
; Set up for the loop which tests the interrupt BR levels. 
3< 
000340 MOV $340,R5 ;SET UP THE PRIORITY LEVEL TO 7. 
CLR R3 sCLEAR THE RX PRIORITY STORE AND FLAGS. 
CLR R2 sCLEAR THE TX PRIORITY STORE AND FLAGS. 
;¢ 
; Enable TX and RX interrupts. 
; Processor priority should be at 7 disabling the interrupts. 
ad 
022236 JSR PC ,RXIE1 sENABLE RECEIVER INTERRUPTS. 
023012 JSR PC, TXIE1 sENABLE TRANSMITTER INTERRUPTS. 
: Loop. lowering the processor priority until the DUT interrupts on RX and TX. 
3° 
002340 6$: CLR TXINTC sCLEAR THE TX INTERRUPT COUNTER. 
002342 CLR TXINTF sCLEAR THE TX INTERRUPT FLAGS. 
002334 CLR RXINTC sCLEAR THE RX INTERRUPT COUNTER. 
002336 CLR RXINTF s;CLEAR THE RX INTERRUPT FLAGS. 
MTPS RS sSET PROCESSOR PRIORITY TO THE SELECTED VALUE. 
000001 MOV 01,R4 sPASS 1 MS COUNT TO THE DELAY ROUTINE. 
020300 JSR PC ,DELAY sDELAY 1 MS TO ALLOW INTERRUPTS TO OCCUR. 


; Determine if any RX DUT interrupts occurred. 
; Log the processor priority for the RX interrupt if first RX int. 
87 
002334 TST RXINTC sCHECK THE RECEIVE INTERRUPT COUNTER. 
BEQ 83 sSKIP THE PRIORITY LOG IF NO RX INT OCCURRED. 


3¢ 
; If this is the first RX interrupt, log the priority. 
r Tad 


TST R3 sCHECK THE RX PRIORITY STORE AND FLAGS. 
BNE 83 sGOTO TEST FOR TX INTS IF NOT THE FIRST RX INT. 
MOV RS,R3 sLOG THE PRESENT PRIORITY IN THE RX PRIO STORE. 
100000 BIS #61T15,R3 sSET THE RX INT HAS OCCURRED FLAG. 
002336 MOV RXINTF ,RO sGET THE RX INTERRUPT ROUTINE FLAGS. 





aan eee 
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ee 


7062 
7063 


035416 
035422 


035476 
035500 


035502 
035506 
035512 
035514 


035520 
035520 
035522 
035524 
035526 
035530 


042700 
050003 


005737 
001405 


005702 
100403 
010502 
052702 


162705 
002402 
030203 
100331 


106427 


013700 
104436 


013700 
104436 


005702 
100414 


012701 
005777 
100402 
012701 


104455 
005673 
014601 
016470 
000423 


- BRLEVA - 
137777 


002340 


100000 


000040 


000340 
002232 


002234 


014424 
144532 


014516 





SEQ 0180 


BIC #137777,RO0 ;CLEAR ALL BUT THE TX INT ERROR FLAG. 
BIS RO,R3 :IF TX INT ERROR, SET BIT 14 OF THE PRIO FLAGS. 
3¢ 
; Determine if any TX DUT interrupts have occurred. 
; Log the present processor priority if this is the first TX interrupt. 
3° 
8$: TST TXINTC ;CHECK THE TRANSMIT INTERRUPT COUNTER. 
BEQ 10$ sSKIP THE PRIORITY LOG IF NO TX INT OCCURRED. 
3¢ 
; If this is the first TX interrupt, log the priority. 
3° 
TST R2 s;CHECK THE TX PRIORITY STORE AND FLAGS. 
BMI 10$ ;SKIP THE LOGGING IF NOT FIRST TX INTERRUPT. 
MOV RS ,R2 3L0G THE PRESENT PRIORITY IN THE TX PRIO STORE. 
BIS @B1T15, R2 ;SET THE TX INT HAS OCCURRED FLAG. 
7° 
; Select next processor priority. 
; Test for both RX and TX interrupts having occurred, loop if not. 
g= 
10$: SUB @40,R5 sDECREMENT PRIORITY LEVEL BY ONE. 
BLT 12$ ;GOTO CHECK FOR ERRORS IF BELOW PRIORITY ZERO. 
BIT R2,R3 ;AND PRIO FLAGS TOGETHER, ALTER NONE OF THEM. 
BPL 6$ ;LOOP IF RX AND TX INTS HAVEN'T BOTH OCCURRED. 
3;* 
; Disable interrupts and clear interrupt vectors. 
37 
12$: MTPS @PRIO7 sDISABLE ALL INTERRUPTS. 
CLRVEC RXVECA ;RETURN RX INT VECTOR TO UNUSED POOL. 
MOV RXVECA,RO 
TRAP CsCveEc 
CLRVEC TXVECA ;RETURN TX INT VECTOR TO UNUSED POOL. 
MOV TXVECA,RO 


TRAP CsCvEC 
3¢ 
; Verify that RX and TX interrupts occurred, 
; at the proper BR level, and 
; in the proper order. 
3 Determine if TX interrupt occurred. 


TST R2 sDETERMINE WHETHER TX INT OCCURRED OR NOT. 
BMI 16% ;SKIP THESE ERRORS IF TX INT OCCURRED. 
3° 
; Determine reason that no TX int occurred. 
= 
MOV #€M2610,R1 ;SELECT “NO TX INT FROM TX.ACTION” MESSAGE. 
TST @CSRA sCHECK THE TX.ACTION BIT OF THE DUT CSR. 
BMI 14% sSKIP TX.ACTION CLR MSG SELECTION IF IT IS SET. 


MOV @€M2611,R1 ;SELECT “TX.ACTION CLEAR AFTER CHARS SENT” MSG. 
sREPORT “INTERRUPT BR LEVEL TEST ERROR:” 
143: ERROF  3003,EM3001,ERO503; >>>>> ERROR @3003 <<<<<, 
TRAP CSERDF 


WORD 3003 

-WORD EM3001 

-WORD EROSOS 
BR 18% sSKIP THE BR LEVEL CHECK, NO TX INT OCCURRED. 


7° 
; Verify that the 7X interrupt wes at the proper BR level. 





sv 
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SEQ 0181 
HARDWARE TEST - BRLEVA - 





sCALCULATE THE BR LEVEL 
THAT THE TRANMSIT 










R2,R4 
177400 #177400,R4 





THE PROCESSOR PRIORITY 






























7118 035550 006204 ASR Ra LEVEL AT WHICH THE 

7119 035552 005204 INC R4 s TRANSMIT INTERRUPT OCCURRED. 

7120 035554 113705 002242 MOVE BRLEVL.RS 3;GET THE EXPECTED INTERRUPT BR LEVEL. 

7121 035560 120405 CMPB R44, RS sCOMARE THE INTERRUPT BR LEVEL WITH EXPECTED. 

7122 035562 001406 BEQ 18% sSKIP THE ERROR IF BR LEVEL IS CORRECT. 

7123 sREPORT “TX INTERRUPT GENERATED AT WRONG BR LEVEL: ...” 

7124 035564 012701 014726 MOV @E€M3003,R1 ;SELECT THE ERROR MESSAGE FOR THE ERROR CALL. 

7125 035570 ERROF 3004 ,EM3001,ER3001; >>>>> ERROR #3004 <<cce<, 
035570 104455 TRAP  C9EROF 
035572 005674 -WORD 3004 
635574 014601 -WORD EM3001 
035576 017070 -WORD ER3001 

7126 3° 

i dd ; Determine if RX interrupt occurred. 

128 s- 

7129 035600 005703 18%: TST RZ sCHECK THE RX INT OCCURRED FLAG. 

hy 035602 100415 BMI 22% ;SKIP THESE ERRORS IF RX INT OCCURRED. 

1 3° 

Le ; Determine reason that no RX int occurred. 

1 3- 

7134 035604 012701 013603 MOV @EM2602,R1 sSELECT “NO RX INT FROM TX.ACTION” MSG. 

7135 035610 032777 000200 144426 BIT @81T7,8CSRA sCHECK THE RX.DATA.AVAIL BIT OF THE DUT CSR. 

7136 035616 001002 BNE 20% sSKIP RX.DATA.AVAIL CLR MSG IF BIT IS SET. 

7137 035620 012701 014632 MOV @€M3002,R1 sSELECT “NO RX.DATA.AVAIL AFTER RESET” MSG. 

7138 sREPORT “INTERRUPT BR LEVEL TEST ERROR:” 

7139 035624 208: ERRDF 3005,EM3001,ERO503; >>>>> ERROR @3005 <<<cc<, 


. WOR 
ony 035634 000423 BR 243 ;SKIP THE BR CHECK IF NO RX INT OCCURRED. 
141 3¢ 
ps | ; Verify that the RX interrupt wes et the proper BR level. 
14 90 
7144 035636 010304 22%: MOV R3,R4 sCALCULATE THE BR LEVEL 
7145 035640 042704 177400 BIC #177400,R4 s THAT THE RECEIVE 
7146 035644 006204 ASR RS 3s INTERRUPT WAS 
7147 035646 006204 ASR Ra ; REQUESTED AT, WHICH 
7148 035650 006204 ASR R4 ; IS ONE GREATER THAN 
7149 035652 006204 ASR R4 3; THE PROCESSOR PRIORITY 
7150 035654 006204 ASR R4 3; LEVEL AT WHICH THE 
7151 035656 005204 INC Ra ; RECEIVE INTERRUPT OCCURRED. 
7152 035660 113705 002242 MOVE BRLEVL,RS sGET THE EXPECTED INTERRUPT BR LEVEL. 
7153 035664 120405 . CHPB R44, RS sCOMARE THE INTERRUPT BR LEVEL WITH EXPECTED. 
7154 035666 001406 BEQ 24% sSKIP THE ERROR IF BR LEVEL IS CORRECT. 
7155 sREPORT “RX INTERRUPT GENERATED AT WRONG BR LEVEL: ...” 
7156 035670 012701 015002 MOV @EM3004 ,R1 sSELECT ERROR MESSAGE FOR THE ERROR CALL. 
7157 035674 ERROF 3006 ,EM3001,ER3001; >>>>> ERROR @3006 <<<<<, 
035674 104455 TRAP CsEROF 
035676 005676 «WORD 3006 
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014601 -WORD €EM3001 


























035702 017070 -WORD ER3001 

7158 

7159 se 

cor s Test for interrupts occuring in the proper order. 

1 s- 

7162 035704 032703 040000 24%: BIT @BIT14,R3 sCHECK THE IMPROPER INT ORDER ERROR FLAG. 

7163 035710 001406 BEQ 26% sSKIP ERROR REPORT IF ERROR DID NOT OCCUR. 

7164 sREPORT “TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT. * 

7165 035712 012701 015056 MOV #€M3005,R1 sSELECT THE ERROR MESSAGE FOR INDIRECT PRINT. 

7166 035716 ERROF  3007,EM3001,EROS03; >>>>> ERROR #3007 <<<<<, 
035716 104455 TRAP CSEROF 
035720 005677 -WORD 3007 
035722 014601 -WORD EM3001 
035724 016470 -WORD ERO503 

7167 3¢ 

Ls 4 s Clean up, exit the test. 

ge 

7170 035726 004737 02276¢ 26%: JSR PC, TXIEO sCLEAR TRANSMITTER INTERRUPTS. 

7171 035732 004737 022204 JSR PC ,RXIEO sCLEAR RECEIVER INTERRUPTS. 

7172 035736 005037 002352 60$: CLR CTRLCF sINDICATE THAT WE ARE NOT WITHIN A TEST. 

7173 035742 106427 000240 MTPS @PRIOS sDISABLE ALL BUT LTC INTERRUPTS. 

7174 035746 ENOTST 
035746 L10056: 

1 035746 104401 TRAP CSETST 
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7177 
7178 
7179 
7180 
7181 
7182 
7183 
7184 
7185 


7186 


000032 
012737 
012737 
012737 
012737 
012737 
012737 


004737 
103077 


013705 


012737 
010413 
052777 


012701 
013702 
004737 
103042 


005237 
012701 
013702 


- DIABMP - 


017422 


020156 


002236 
002244 


006036 
000002 


010764 
002250 
023172 


003770 
070012 
002244 





002326 
002352 
003766 
003770 
003772 
003774 


003770 
144170 


-SBTTL HARDWARE TEST - DIABMP - 
3%? 0260646606660 60066066 6600606606 60666066466060066466666646606066646664646664664666664646006 
34 ‘ = Diagnostic field (BMP) Test - 
34 This test verifies thet a request to the DUT to report BHP status 
34 codes is complied with, within the specified time. 
34 All active lines are tested. 
B-- $0006066 06060406606 00606 0666066666666 0666646466 06606066 6666664666446 666646648 6406466664 

BGNTST eat 

TNUM == TNUM « 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM sSET UP THE TEST NUMBER. (31) 

MOV @-1,CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV #1, ERRTYP sSET ERROR TYPE AS FATAL IN ERROR TABLE. 


MOV #3101.,ERRNBR ;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
MOV @EM3101,ERRMSG ;SET ERROR MESSAGE ADDRESS IN ERRTBL. 
MOV @ER9101,ERRBLK ;SELECT THE CORRECT ERROR REPORTING ROUTINE. 


3° 

; Reset the DUT to a known state, remove the status codes from the fifo. 
; Clear TX and RX interrupt enable bits in the CS 

; This subroutine reports error >>>>> 3101 <<<<<, 


g@ 
JSR PC,CLNRST sRESET THE DHV11-M, REPORT ANY ERRORS FOUND. 
BCC 60$ sRESET FAILURE?, ABORT THIS TEST. 

3¢ 

; Test ell active lines individually. 

; Write the request code to the diagnostic field in the LPR register. 

; Verify that a BMP code is returned within the correct time. 

- 


MOV ACTLNS RS sGET THE ACTIVE LINE BIT MAP. 
CLR R4 s;CLEAR THE LINE NUMBER COUNTER. 
MOV CSRA,R3 sGET THE ADDRESS OF THE DUT’S CSR. 
23: cLC sCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 
ROR RS sSHIFT THE BIT MAP INTO THE CARRY BIT. 
BCC 8$ ;D0 NOT TEST THE LINE IF IT IS INACTIVE. 


3¢ 
; Select the line under test. 
; Write the BMP request code to the DIAG field in the LPR register. 


; MOV #3102.,ERRNBR ;SET THE ERROR NUMBER TO 3102. 
MOV R4,(R3) sSELECT THE LINE CURRENTLY UNDER TEST. 
BIS #2,8LPRA sWRITE THE BMP REQUEST CODE TO THE LPR. 


;* 

; Weit for BMP request code to be cleared, report error if time-out 
3; occurs. 

sine 


MOV #10764 ,R1 sTEST BIT 1, TIMEOUT OF 500 MILLI SECS. 


MOV LPRA,R2 sPASS THE ADDRESS OF THE REGISTER TO TEST. 
JSR PC ,WAIBIC sWAIT FOR REQUEST CODE TO CLEAR. 
Bcc 6$ ;GO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 
7¢ 
; Wait for BMP code to appear in the fifo, report error if time-out 
; occurs. 
"INC — ERRNBR ;SET ERROR NUMBER TO 3103. 
MOV #70012,R1 sTEST BIT 7, TIMEOUT OF 10 MILLI SECS. 
MOV CSRA,R2 ;PASS THE ADDRESS OF THE REGISTER TO TEST. 


SEQ 0183 
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7233 036112 
7234 036116 


7242 036120 
7243 036124 
7244 036130 
7245 036132 
7246 036136 
7247 036142 
7248 036144 
7249 036146 
7250 036152 
7251 036154 
7252 036156 
7253 036162 


7254 036164 


7255 036166 
7256 036172 
7257 036174 
7258 036200 


7260 036202 
7261 036204 


7263 036210 
036210 


7267 036212 
7268 036214 
7269 036216 
7270 036220 
7271 036224 

036224 

036224 


-— 





004737 
103031 


010401 
012702 


104460 


005204 
005705 
001306 
005037 


104401 








- DIABMP - 
023246 


003770 
144116 


003770 
170301 
003770 
177760 
000305 
022262 


015204 


002352 


JSR 
BCC 
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PC ,WAIBIS 
6$ 






sWAIT FOR RX_DATA_AVAILABLE TO SET. 
sGO REPORT ERROR IF CODE DID NOT CLEAR IN TIME. 


3¢ 

s Read the BMP code (if it is there) from the RBUF register. 

; Determine if it is a valid BMP code, 

; Verify the BMP code was received from the correct channel. 

: If the BMP code does not indicate DUT running ok, then save it on 
3; the queve to be reported in a later test. 


6$: MOV 


ERROR 


ERRNBR 
gates 


ERRNBR 
#170301,R0 
R2,RO 

6% 

ERRNBR 
R2,RO 

RO 
#177760,R0 
R4,RO 


6$ 
R2,¢305 
8$ 

PC ,SAVBMP 
8s 


R4,R1 
#€M3102,R2 


sSET ERROR NUMBER TO 3104. 

sGET THE BMP CODE FROM THE FIFO. 

sGO REPORT ERROR IF NO BMP CODE FOUND. 

sSET ERROR NUMBER TO 3105. 

sSET-UP A BMP CODE MASK. 

sTRY TO CLEAR THE BMP MASK. 

:GO REPORT ERROR IF IT IS NOT A VALID BMP CODE. 
sSET THE ERROR NUMBER TO 3106. 

sCOPY THE BMP CODE. 

sPUT THE LINE NUMBER IN THE LOW BYTE. 

sCLEAR THE UNWANTED BITS. 

sDID THE BMP CODE COME FROM THE CORRECT LINE?. 
sNO; GO REPORT ERROR. 

sIS THE BMP CODE A "GOOD ONE”?. 

sYES; SKIP SAVING THE BMP CODE ON THE QUEUE. 
sSAVE THE BMP CODE ON THE QUEUE. 

3GO SEE IF THERE ARE ANY MORE LINE TO TEST. 


s;PASS THE LINE NUMBER TO BE REPORTED. 
sPASS THE ERROR MESSAGE TO BE REPORTED. 
;"BMP REQUEST BIT BAD ON LINE:” 

; >>>>> ERROR <<<<<, 


TRAP CSERROR 


3¢ 
; Verify all active lines have been tested. 


8$: INC 

TST 

BNE 

60$: CLR 
ENDTST 


sINCREMENT THE LINE NUMBER COUNTER. 

sARE THERE ANY MORE ACTIVE 'iNES TO TEST?. 
sYES; BRANCH TO TEST THE NEXT LINE. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L10057: 


TRAP CSETST 
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7273 
7274 


—— 


036226 
036226 


036226 
036234 
036242 
036246 
036252 
036254 


036256 
036262 
036262 
036264 
036266 
036270 


036272 


036300 
036304 
036304 
036304 





000033 
012737 
012737 
013702 
012703 
020203 
001411 


012701 
194455 
022125 
015676 
017450 
012737 


005037 


104401 


- DIABMP - 


000033 002326 
177777 002352 


002524 
002526 


016013 


002526 
002352 


002524 


-SBTTL HARDWARE TEST 


FOF SHHKSKSEHKAKSSSESAEKAAEEEAESSEKEAEEEKAKEASKEAKEASEREKEKEREEEEESEEESEEEEEKREDE 


3¢ - Report any BMP codes in the queue - 
34 This is a pseudo-test used to report any BMP codes that were found 
34 in the DUT's FIFO during previous test, and logged in the BMP code 
34 queue. 
34 It is unlikely that running this pseudo-test alone will produce any 
34 error reports. 
3% 
Gr - $600 46000 40046066 0060466666006 064 4606466664646 64660646 46060046 64606064046064646446 46404464 60464464 4404 

BGNTST a 

TNUM == TNUM «+ 1 sINCREMENT THE ASSEMBLY TIME TEST COUNTER. 

MOV @TNUM, TSTNUM ;SET UP THE TEST NUMBER. (93) 

MOV 6-1, CTRLCF sINDICATE THAT WE ARE IN A TEST. 

MOV BMPCOP ,R2 sGET THE CONTENTS OF THE POINTER. 

MOV #BMPCQB,R3 ;GET THE START ADDRESS OF THE QUEUE. 

CMP R2,R3 ;SEE IF THE POINTER HAS MOVED FROM THE BASE. 

BEQ 60$ sEXIT NO CODES IN THE QUEUE. 


3* 


- REPBMP - 


; There is at least one BMP code in the queve. Report the error. 
;Report error BMP CODE FOUND IN TEST nn, BMP CODE:nnnnnn” 


4 
MOV 
ERROF 


MOV 


608: CLR 
ENDTST 


9€M9304,R1 


9301 ,EM9301,ER9301 ; 


#BMPCQB ,, BMPCQP 
CTRLCF 





sPASS THE FIRST MESSAGE TO BE REORTED. 
>>>>> ERROR #9301 <<<<<, 
TRAP CSEROF 


-WORD 9301 
-WORD EM9301 
-WORD ER9301 


sSET POINTER BACK TO THE BEGINING OF THE QUE. 
sINDICATE THAT WE ARE NOT WITHIN A TEST. 


L100G@: 
TRAP CSETST 









SEQ 0185 
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HMAROWARE TEST 


— 


7344 
7345 


7346 
7347 
7348 


7349 
7356 


036306 
036306 
036310 


036310 
036310 
036312 
036314 
036316 


036320 
036320 
036322 
036324 
036326 


036330 
036330 
036332 
036334 
036336 
036340 


036342 
036342 
036344 
036346 
036350 
036352 


036354 
036354 





000022 


000031 
036354 
160000 
177776 


000000 





hah adahatahatalalalalalatetaiatsininiaisiniainiainisinniniaininisinialaininaaiaiaiaiaisiennauanenesccccccrrc eC EE EP 


. 
; VOHA . HWQ 


: 
hhh ahaiahatatalalatalaialallaisininininisiainistainininininininisinisiisiiiiiiiuui uit titi tt tT tL LRT TT TREE EERE Ey 


-SBTTL HARDWARE PARAMETER CODING SECTION 


34 
; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 

; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
; WITH THE OPERATOR. 

ge 


BGNHRD 


sDEVICE CSR ADDRESS QUESTION: 
GPRMA HWPTQ1,0,0,160000, 177776, YES 


sDEVICE INTERRUPT VECTOR QUESTION: 
GPRMA HWPTQ2,2,0,40,776, YES 


sACTIVE LINES BIT MAP QUESTION: 
GPRMD HWPTQ3,4,0,MAPLNS,0,177777, YES 


sINTERRUPT BR LEVEL QUESTION: 
GPRMD HWPTQS,6,0,377,0,6,YES 


ENDHRD 


-WORD L10061-L$HARD/2 
L$HARD:: 


T$CODE 
HWPTQ1 
T$LOLIM 
T$HILIM 


T$CODE 
HWPTQ2 
T$LOLIM 
T$HILIM 


T$CODE 
HWPTQ3 
MAPLNS 
T$LOLIM 
T$HILIM 


T$CODE 
HWPTQ5 
377 
T$LOLIM 
TSHILIM 

























SEQ 0186 
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HARDWARE PARAMETER CODING SECTION 
7357 036354 103 123 122 


te) 
7358 036372 111 116 124 


7359 ceeaae 101 103 124 


7361 
7362 


—— 
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HWPTQ1: .ASCIZ /CSR ADDRESS: / 


HWPTQ2: .ASCIZ /INTERRUPT VECTOR ADDRESS: / 


HWPTQ3: .ASCIZ /ACTIVE LINE BIT MAP: / 


HWPTQS: .ASCIZ /INTERRUPT BR LEVEL: / 


-EVEN 


SEQ 0187 
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HARDWARE PARAMETER CODING SECTION 


s 


— 


7365 


7384 


036500 
036500 
036502 


036502 
036502 
036504 
036506 


036510 
036510 
036512 
036514 
036516 
036520 


036522 
036522 
036524 
036526 


036530 
036530 


036530 
036533 
036536 
036541 
036544 
036547 
036552 
036555 
036560 
036563 





000013 


000130 
036530 
000020 


001052 
036604 
177777 
000000 
177777 


000130 
036673 
000001 


Sh ahaadatadaialatataialatainialaisiaiaiaisiainiaisinininiaininiaisisinuisisniaieiamaiainmaienaanaancccccccccr ere CEE 


VOHA . SWQ 


ehatahatadalalatedatahaininiaiaiaiaiaisigininininininiaiaiaisisininininiainieiaiainmnauainaucicacccanccc CO En 


-SBTTL SOFTWARE PARAMETER CODING SECTION 


344 
THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 


THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR T9 ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


BGNSFT 


L$SOFT:: 


sUNIT NUMBER PRINTOUT QUESTION: 


GPRML SWPTQ1,0,20, YES 


sNUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 


GPRMD SWPTQ2,2,0,177777,0,177777, YES 


sROM VERSION PRINTOUT ON FIRST PASS QUESTION: 





GPRML SWPTQ3,0,1,YES 


-WORD TSCODE 
-WORD SWPTQ3 
-WORD 1 
-EVEN 
ENDSFT 
-EVEN 
L10062: 


SWPTQ1: .ASCIZ /REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 


-WORD TSCODE 
-WORD SWPTQ1 
-WORD 20 

-WORD TSCODE 
-WORD SWPTQ2 
-WORD 177777 


-WORD TS$LOLIM 
-WORD  TS$HILIM 















SEQ 0188 


WORD L10062-L$SOFT/2 
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SOFTWARE PARAMETER CODING SECTION 


SEQ 0189 


036566 
036571 
036574 





7413 rege 116 125 115 SWPTQ2: .ASCIZ /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 


ie) 
7414 036673 122 117 115 SWPTQ3: .ASCIZ /ROM VERSION PRINTOUT ON THE FIRST PASS: / 


7415 -EVEN 
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SEQ 0190 


7418 5 05 6 96 i i gl il 0 ul 0h a 0 wu 0 hs ul ul 0h hu gh ul hu uh gh a 0 a oS Ss Be SS en sh eS 


7419 3 
7420 3 FVTSKL6.P11 


; ; 
7422 5 6 6 gh sh so gl 5 0 wg gh a i 0 uk 5 i 0 hl 0 0h ul 6 0 0 uu wl ul lk gu gu wh 0 eB we BS es 


7426 036744 $PATCH:: 
7427 036744 -BLKW 24 


8 
7439 037014 LASTAD 


037014 000000 -WORD 0O 
037016 000000 -WORD O 
037020 L$LAST:: 

7440 037020 ENDMOD 

7441 

7442 

7443 

7444 

7445 

7446 

7447 

7448 000001 -END 


aoe 
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Symbol table 





CTRLCF 
CsAU = 
C$AUTO= 
C$BRK = 
CSBSEG= 
C$BSUB= 
CsCLCK= 
CSCLEA= 
CsCLOS= 
CSsCLPi= 
C$CPBF = 
C$CPME= 
CSCVEC= 
CSOCLN= 
C$000U= 
CSORPT= 
CsoU = 
CsEDIT= 
CSEROF = 
CSERHR= 
CSERRO= 
CSERSF = 
CSERSO= 
CSESCA= 
CSESEG= 
CSESUB= 
CSETST= 
CSEXIT= 
C$FREQ= 
CSFRME= 
C$GETB= 
C$GETW= 
C$GMAN= 
C$GPHR= 
C$GPRI= 
CsINIT= 
C$INLP= 
C$MANI= 
C$MAP = 
C$MEM = 
CSMMU = 
C$MSG = 
CSOPNR= 
CSOPNW= 
C$PNTB= 
C$PNTF= 
CS$PNTS= 
C$PNTX= 
C$PUTB= 
C$PUTW= 
CsQIo = 
C$RDBU= 
CSREFG= 
CSREL = 
C$RESE= 
CsREVI= 
CSRFLA= 


002352 G 
000052 





MACRO YOS.02 Wednesday 


C$RPT = 
C$SEFG= 
C$SPRI= 


EF 9002 
EF 9003 
EF 9004 
EF9005 
EF 9006 
EF 9010 
EF 9016 
EF 9017 
EF 9018 
EF 9019 
EF 9301 
EF 9302 
EM0101 
EM0102 
EM0103 
EmM0201 
EMO0202 
EM0203 
EM0204 
EM0301 
EM0302 
EM0303 
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DOAHDHOAHAOAHAIAIAHAAIANAAAAHAAAAHAHAAAAAARAAAAAAAAADA DHHAHHHOAAH A Aa 





EM0401 
EM0402 
EMOSO1 
EM0S02 
EMOS25 
EM0S26 
EM0601 
EM0602 
EM0603 
EMO701 
EM0702 
EM0703 
EM0801 
EM0802 
EM0901 
EM0902 
—M1001 


EM2607 


007252 
007321 
007471 
007537 
007713 
010003 
010073 
010127 
010307 
010472 
010527 
010707 
011072 
011132 
011205 
011236 
011272 
011336 
011423 
011501 
011525 
011544 
011630 
011706 
011742 
011766 
012012 
012051 
012101 
012167 
012242 
012314 
012327 
012342 
012354 
012362 
012945 
012513 
012570 
012636 
012713 
012755 
013030 
013073 
013167 
013224 
013316 
013423 
013461 
013517 
013553 
013603 
013674 
013762 
014056 
014141 
014200 


DAD AAVAAGAHUAANAHI9 AI AAI AHA AAI AIA AAAI ANA AA AAAAAAAAAAAAAAAAAAAAAAAADAAQAAADA 


F$SDU = 
FSEND = 





ADOHAHHAHHAHAVHAANAAARHAARAARAARHAD HDAOHGAAHAAHAAAHAAAAAAARAARAADRAAAAAD 
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SEQ 0192 

Symbol teble 

FSHARD= 000004 ISPTAB= 000041 L$PROT 024226 G L10054 034062 RMATBB 002304 G 
FsHW = 000013 ISPWR = 000041 L$PRT 002112 G 110055 035074 ROLDAP 021570 G 
FSINIT= 000006 ISRPT = 000041 L$REPP 002062 G L10056 035746 RSTRPT 021622 G 
FSJMP = 000050 ISSEG = 000041 L$REV 002010 G L10057 036224 RXBDTX= 000030 G 
FsMOD = 000000 ISSETU= 000041 L$RPT 024220 G L10060 036304 RXBETX= 000020 G 
FSMSG = 000011 ISSFT = 000041 L$SOFT 036502 G L10061 036354 RXBFUL= 000100 G 
FSPROT= 000021 I$SRV = 000041 L$SPC 002056 G L10062 036530 RXBRRT 023746 G 
FSPWR = 000017 IsSuB = 000041 L$SPCP 002020 G MAPLNS= 000377 G RXIEO 022204 G 
FSRPT = 000012 I$TST = 000041 L$SPTP 002024 G MFUNIT 004076 G RXIE1 022236 G 
FSSEG = 000003 J$JMP = 000167 L$STA 002030 G MMENAB 002404 G RXINPT 024036 G 
FSSOFT= 000005 LNCTRA 002254 G L$SwW 002226 G MMPRES 002402 G RXINTC 002334 G 
FSSRV = 000010 LNCTRO= 000010 G L$TEST 002114 G MMSRO 002400 G RXINTF 002336 G 
F$SUB = 000002 LOE = 040000 G L$TIML 002014 G MSG1 016174 G RXVECA 002232 G 
F$sSW = 000014 LOT = 000010 G L$UNIT 002012 G MSG2 016252 G ROSLOT= 000002 G 
FSTEST= 000001 LPCSLT= 000036 G L1i0000 002224 MSG3 016331 G RiSLOT= 000004 G 
GETPRM 024634 LPRA 002250 G L1i0001 002232 MSLCNT 002376 G R2SLOT= 000006 G 
GPRSOB 002450 G LPRO = 000004 G L10002 016172 MSLGET 020340 G R3SLOT= 000010 G 
GSCNTO= 000200 L$ACP 002110 G L1i0003 016466 MSLOOP 020454 G R4SLOT= 000012 G 
GSDELM= 000372 L$APT 002036 G L10004 016512 MSTICK 002374 G RSSLOT= 000014 G 
G$DISP= 000003 L$AU 025244 G L1i0005 016560 NDERPT 002230 G SAVBMP 022262 G 
GSEXCP= 000400 L$AUT 002070 G L1i0006 016710 NEWPAS 024614 SFPTBL 002226 G 
G$HILI= 000002 L$AUTO 025076 G L10007 017006 NEWRES 024606 SKPSTS 022330 G 
G$LOLI= 000001 L$CCP 002106 G L10010 017066 NEWSTA 024300 STATA 002252 G 
G$NO = 0C0000 LS$CLEA 025100 G L10011 017156 NUMLNS= 000010 G STATO = 000006 G 
GSOFFS= 000400 L$co 002032 G L10012 017260 ooPS 020470 G SVCGBL= 000000 
GSOFSI= 000376 L$DEPO 002011 G L10013 017336 OPTION 002226 G SVCINS= 000001 
G$PRMA= 000001 L$DESC 004046 G L10014 017420 OSAPTS= 000000 SVCSUB= 000001 
G$PRMD= 000002 L$DESP 002076 G L10015 017446 OsAU = 000000 SVCTAG= 000001 
GSPRML= 000000 L$DEVP 002060 G L10016 017626 O$BGNR= 000001 SVCTST= 000001 
G$RADA= 000140 L$DISP 002124 G L10017 024224 O$BGNS= 000001 SWAPO 022406 G 
G$RADB= 000000 L$DLY 002116 G L10021 025074 OsDU = 000001 SWPTQi 036530 
G$RADD= 000040 L$OTP 002040 G L1i0022 025076 OSERRT= 000001 SWPTQ2 036604 
G$RADL= 000120 LS$OTYP 002034 G L10023 025132 O$GNSW= 000001 ' SWPTQ3 036673 
G$RADO= 000020 L$DU 025134 G L10024 025242 O$POIN= 000001 S$LSYM= 010000 
G$XFER= 000004 L$DUT 002072 G L10025 025250 O$SETU= 000000 TIMER1 002364 G 
GSYES = 000010 L$DVTY 004036 G L10026 025540 PAROA 002406 G TIMER2 002366 G 
HELP = 000000 LSEF 002052 G L10027 025754 PASCNT 002332 G TIMERS 002370 G 
HOE = 100000 G LSENVI 002044 G L10030 026204 PCSLOT= 000016 G TNUM = 000033 G 
HWPTQ1 036354 LSERRT 003766 G L10031 026366 PNT = 001000 G TP4FLG 002346 G 
HWPTQ2 036372 LSETP 002102 G L10032 026544 PREGRT 004020 G TP4RTN 024122 G 
HWPTQ3 036425 L$EXP1 002046 G L10033 026746 PREGOS 003776 TP4VEC 002344 G 
HWPTQS 036453 LSEXP4 002064 G L1i0034 027140 PRI = 002000 G TSABRT 022456 G 
IBE = 010000 G LSEXPS 002066 G L10035 027332 PRIOO = 000000 G TSTNUM 002326 G 
IdU = 000040 G L$HARD 036310 G L10036 027504 PRIO1 = 000040 G TXADIA 002256 G 
IER = 020000 G L$HIME 002120 G L10037 027704 PRIO2 = 000100 G TXAD10= 000012 G 
IESTAT 002330 G LSHPCP 002016 G L10040 030116 PRIO3 = 000140 G TXAD2A 002260 G 
ISR = 000100 G LSHPTP 002022 G L10041 030364 PRIO4 = 000200 G TXAD20= 000014 G 
IXE = 004000 G LS$HW 002214 G L10042 030726 PRIOS = 000240 G TXBFCA 002262 G 
IsAU = 000041 L$ICP 002104 G L10043 031312 PRIO6 = 000300 G TXBFCO= 000016 G 
ISAUTO= 000041 LSINIT 024234 G L10044 031522 PRIO7 = 000340 G TXCHA 002246 G 
ISCLN = 000041 L$LADP 002026 G L10045 031736 PUFIFO 020716 G TXCHRO= 000002 G 
IsDU = 000041 L$LAST 037020 G L10046 032202 RBUFA 002246 G TXDSBL 022570 G 
ISHRD = 000041 LS$LOAD 002100 G L10047 032452 RBUFO = 000002 G TXENBL 022664 G 
ISINIT= 000041 L$LUN 002074 G L10050 032560 RDPDR 021000 G TXIEO 022760 G 
IsMOD = 000041 L$MREV 002050 G L10051 032770 REGTST 021220 G TXIE1 023012 G 
ISMSG = 000041 LSNAME 002000 G L10052 033224 REPSMR 021430 G TXINTC 002340 G 
ISPROT= 000040 L$PRIO 002042 G L10053 033524 RESETT 021456 G TXINTF 002342 G 
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SEQ 0193 

























TXINTR 024144 G TS$SAVL* 177777 T$$PRO= 010020 T2 025542 G VAM = 000200 G 
TXVECA 002234 G T$SEGL* 177777 T$$RPT= 010017 T20 032562 G UNBTTB 002264 G 
TSARGC= 000003 T$SUBN= 000000 T$$SOF= 010062 Tai 032772 G UNITN 002240 G 
TSCODE= 000130 T$TAGL= 177777 T$$SW = 010001 T22 033226 G UNSOIV 023036 G 
TSERRN= 022125 TSTAGN= 010063 T$$TES= 010060 T23 033526 G WAIBIC 023172 G 
TSEXCP= 000000 TSTEMP= 000000 11 025252 G T24 034064 G WAIBIS 023246 G 
TSFLAG= 000050 TSTEST= 000033 T10 027506 G Tes 035076 G WOPOR 023322 G 
TSGMAN= 000000 T$TSTM= 177777 Til 027706 G T26 035750 G WORD 002350 G 
TSHILI* 177777 T$TSTS= 000001 T12 030120 G T27 036226 G WTIWLNC 023516 G 
T$LAST= 000001 T$$AU = 010025 T13 030366 G T3 025756 G WIWLNS %23546 G 
TS$LOLI= 000000 T$$AUT= 010022 T14 030730 G 14 026206 G WTIWLPR 023572 G 
TSLSYM= 010000 TS$SCLE= 010023 T15 031314 G TS 026370 G X$ALWA* 000000 

TSLTNO= 000033 T$$DU = 010024 T16 031524 G T6 026546 G X$FALS* 000040 

TSNEST= 177777 T$$HAR= 010061 T17 031740 G 17 026750 G XSOFFS= 000400 

T#NSO = 000000 T$$HW = 010000 T18 032204 G T8 027142 G X$TRIE= 000020 

T$NS1 = 000005 TS$$INI= 010021 T19 032454 G 19 027334 G $PATCH 036744 G 





TSPTNU= 000000 T$$MSG= 010016 


- ABS. 037020 000) = CRW, I, GBL, ABS, OVR) 
000000 001 (RW,I,LCL,REL,CON) 
Errors detected: 0 











ee Assembler statistics 







Work file reads: 269 

Work file writes: 279 

Size of work file: 35712 Words ( 140 Pages) 
Size of core pool: 19714 Words ( 75 Pages) 
Operating system: RSX-11M/PLUS (Under VAX/VMS) 


Elapsed time: 00:52:56.11 
CVOHADO. BIN, CVDHADO.LST/-SP=SVC40/ML , CVDHADO.P11 








